X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute.pm;h=5681e0394e620ea54f78f986724ed8b117746cc0;hb=cb8e869e379c398314f48bbd1bb180af0c6b5a34;hp=9e887635e8d470b13f17deb81978bdc3e85db352;hpb=6a370213479b325afe724d59c180de65d9f9af7c;p=spider.git

diff --git a/perl/Route.pm b/perl/Route.pm
index 9e887635..5681e039 100644
--- a/perl/Route.pm
+++ b/perl/Route.pm
@@ -197,7 +197,9 @@ sub config
 	}
 
 	if ($printit) {
-		my $pcall = "$call:" . $self->obscount;
+		my $pcall = $call;
+		$pcall .= ":" . $self->obscount if $self->via_pc92;
+
 		
 		$line = ' ' x ($level*2) . "$pcall";
 		$call = ' ' x length $pcall;