X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUser.pm;h=23996b0700d99ce3e18f719081a29c32bb037edf;hb=101516b420ac77cd9eb8294651104e43f3461c06;hp=ca73a02ed2ffde0668dd9b4ce7e047a4ce3d3742;hpb=5e7031a532b4df6beb475aa3e7e3f6eec29360a6;p=spider.git

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index ca73a02e..23996b07 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -243,8 +243,8 @@ sub decode
 	my $ref;
 	eval '$ref = ' . $s;
 	if ($@) {
-		dbg('err', $@) if $@;
-		Log('err', $@) if $@;
+		dbg($@);
+		Log('err', $@);
 		$ref = undef;
 	}
 	return $ref;