X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=be9d652f12aa6c4a06b8eb6eb0d2edde5d0de79d;hb=34b7ed3f88da5b993281b7c1ee9af699e1b9b54b;hp=a27d8d3060b842cd1618c4bbc67c583fc041d2bc;hpb=281b5d6baba694aa7b99be87a7be46a59ed0bd6c;p=spider.git

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index a27d8d30..be9d652f 100644
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -795,7 +795,7 @@ sub find_cmd_name {
 		#we have compiled this subroutine already,
 		#it has not been updated on disk, nothing left to do
 		#print STDERR "already compiled $package->handler\n";
-		;
+		dbg("find_cmd_name: $package cached") if isdbg('command');
 	} else {
 
 		my $sub = readfilestr($filename);