[SimBot-commits] CVS: simbot simbot.pl,1.142,1.143

[Kevin S. <ks...@us...>]

Update of /cvsroot/simbot/simbot
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26038

Modified Files:
	simbot.pl 
Log Message:
The freenode sink server seems to send the supports numeric with an empty message; plug a resulting warning.

Index: simbot.pl
===================================================================
RCS file: /cvsroot/simbot/simbot/simbot.pl,v
retrieving revision 1.142
retrieving revision 1.143
diff -u -d -p -r1.142 -r1.143
--- simbot.pl	12 Dec 2005 02:39:41 -0000	1.142
+++ simbot.pl	17 Dec 2005 10:04:56 -0000	1.143
@@ -1713,7 +1713,8 @@ sub server_banned {
 # Also, could be used to push ignores serverside with the SILENCE command
 sub server_supports {
     my ($message) = $_[ARG1] =~ m/^(.*):.*?$/;
-    &debug(DEBUG_INFO, "Server supports: ${message}\n");
+    &debug(DEBUG_INFO, "Server supports: " .
+		   (defined $message ? $message : "nothing") . "\n");
 
     foreach my $cur_block (split(/ /, $message)) {
         if(my ($ircd) = $cur_block =~ m/^IRCD=(\S+)/) {