X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=7147b35c24ad6d1f1bab960b4be7a25d9ea583d9;hb=b0d9bed295647635da9cd1ceeb5e4592bd87094b;hp=35c92341d17cbc896a0a64d6941e9a3d156dea77;hpb=6543cc71201e2aaa882801b8624b15ab88aa9a31;p=spider.git

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index 35c92341..7147b35c 100644
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -793,7 +793,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);