From: minima <minima>
Date: Sat, 9 Jun 2001 03:16:58 +0000 (+0000)
Subject: fix sh/c/n
X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=73118618254ddfa6253ccc737d780a0b9823d9e5;p=spider.git

fix sh/c/n
---

diff --git a/cmd/show/configuration.pl b/cmd/show/configuration.pl
index 95211a0f..f563b6ae 100644
--- a/cmd/show/configuration.pl
+++ b/cmd/show/configuration.pl
@@ -34,8 +34,8 @@ if ($list[0] && $list[0] =~ /^NOD/) {
 				push @l, "";
 				$i = 0;
 			}
-			my $s = $call->{call};
-			$s = sprintf "(%s)", $s if $call->{here} == 0;
+			my $s = $call->call;
+			$s = sprintf "(%s)", $s unless $call->here;
 			push @l, $s;
 			$i++;
 		}