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

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

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

Modified Files:
	simbot.pl 
Log Message:
Let's reduce the message size allowance from 440 to 425.  This should hopefully
prevent truncation that we seem to be seeing on freenode.

Index: simbot.pl
===================================================================
RCS file: /cvsroot/simbot/simbot/simbot.pl,v
retrieving revision 1.141
retrieving revision 1.142
diff -u -d -p -r1.141 -r1.142
--- simbot.pl	15 Nov 2005 12:53:00 -0000	1.141
+++ simbot.pl	12 Dec 2005 02:39:41 -0000	1.142
@@ -1163,7 +1163,7 @@ sub send_pieces {
 
 ### cont_send_pieces
 # This is called by POE to break the message up into pieces of no more
-# than 440 characters. This accommodates the message length limitation
+# than 425 characters. This accommodates the message length limitation
 # on most IRC networks.
 #
 # Arguments:
@@ -1192,7 +1192,7 @@ sub cont_send_pieces {
             my $nextWord;
             ($curWord, $nextWord) = ($1, $2);
             unshift(@words, $nextWord);
-            if(length($line) + length($curWord) <= 440) {
+            if(length($line) + length($curWord) <= 425) {
                 $line .= $curWord;
                 $kernel->delay('cont_send_pieces', 1, $type, $dest, $prefix,
                                join('', @words));
@@ -1201,7 +1201,7 @@ sub cont_send_pieces {
                                ("$curWord\n" . join('', @words)));
             }
             last;
-        } elsif(length($line) + length($curWord) <= 440) {
+        } elsif(length($line) + length($curWord) <= 425) {
             $line .= $curWord;
 		} else {
             # next word would make the line too long.