X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXM.pm;h=fe1bca7db2af02b5e4c41bb8136c0fbe191108f3;hb=e39b738850b9a122b60b179e9723e546ddacfd62;hp=ee2f4539c050940b81ec6d49a61ee3edc9af778e;hpb=0bd9d2811cc42417676a1b11b121681c2377d70a;p=spider.git diff --git a/perl/DXM.pm b/perl/DXM.pm index ee2f4539..fe1bca7d 100644 --- a/perl/DXM.pm +++ b/perl/DXM.pm @@ -34,7 +34,7 @@ sub msg } return "unknown message '$m' in lang '$lang'" if !defined $s; my $ans = eval qq{ "$s" }; - confess $@ if $@; + warn $@ if $@; return $ans; }