changed debug api interface to use less CPU

[spider.git] / perl / DXUser.pm

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index ca73a02ed2ffde0668dd9b4ce7e047a4ce3d3742..23996b0700d99ce3e18f719081a29c32bb037edf 100644 (file)
--- 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;