X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconsole.pl;h=bc3f3a9f40309e4dc8cd50d84b724e953755b1ba;hb=f7ce6f45eae627c1368ffea0e1e56e84fec676be;hp=5fd965ee8f1da9f0d3a950daed7036531d214495;hpb=92252919695d703a2edd5b76d2f8237d5ac55062;p=spider.git

diff --git a/perl/console.pl b/perl/console.pl
index 5fd965ee..bc3f3a9f 100755
--- a/perl/console.pl
+++ b/perl/console.pl
@@ -221,6 +221,11 @@ sub rec_socket
 		} elsif ($sort && $sort eq 'Z') { # end, disconnect, go, away .....
 			cease(0);
 		}	  
+		# ******************************************************
+		# ******************************************************
+		# any other sorts that might happen are silently ignored.
+		# ******************************************************
+		# ******************************************************
 	}
 	$top->refresh();
 	$lasttime = time;