]> scm.dxcluster.org Git - spider.git/commitdiff
got rid of useless brakets on eval in decode in DXUser
authordjk <djk>
Sun, 14 Nov 1999 20:55:36 +0000 (20:55 +0000)
committerdjk <djk>
Sun, 14 Nov 1999 20:55:36 +0000 (20:55 +0000)
perl/DXUser.pm

index 554a9930cdfc35ee6174c18a9893774fdd827cd7..9f61312e87554d9d5576765f324ed84054e94f73 100644 (file)
@@ -216,7 +216,7 @@ sub decode
        my $s = shift;
        my $ref;
        $s = '$ref = ' . $s;
        my $s = shift;
        my $ref;
        $s = '$ref = ' . $s;
-       eval { $s; };
+       eval $s;
        Log('DXUser', $@) if $@;
        $ref = undef if $@;
        return $ref;
        Log('DXUser', $@) if $@;
        $ref = undef if $@;
        return $ref;