add branch to sh/ver, rm redundant module

[spider.git] / cmd / show / node.pl

diff --git a/cmd/show/node.pl b/cmd/show/node.pl
index 4e03f4bad712596388a233b09764e8cf14400c09..5fdbf103113c36c34b00eb4f6e74273366c6dc5e 100644 (file)
--- a/cmd/show/node.pl
+++ b/cmd/show/node.pl
@@ -52,9 +52,8 @@ sub generate
        
                push @call, DXUser::scan(sub {
                                                                          my $k = shift;
-                                                                         my $l = shift;
                                                                          # cheat, don't decode because we can easily pull it out from the json test
-                                                                         return $l =~ m{"sort":"[ACRSX]"} ? $k : ();
+                                                                         return $_[0] =~ m{"sort":"[ACRSX]"} ? $k : ();
                                                                  });
        }