From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Mon, 22 Mar 2004 18:39:56 +0000 (+0000)
Subject: line len
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=381950491eb6b71bb51a82bfa2508dc2994b86c4;p=infobot.git

line len


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@920 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/blootbot/src/IRC/Irc.pl b/blootbot/src/IRC/Irc.pl
index f230cf7..8b974c0 100644
--- a/blootbot/src/IRC/Irc.pl
+++ b/blootbot/src/IRC/Irc.pl
@@ -18,6 +18,7 @@ use vars qw($b_blue $ob);
 use vars qw(@ircServers);
 
 $nickserv	= 0;
+$maxlinelen	= 400;
 
 sub ircloop {
     my $error	= 0;
@@ -109,12 +110,14 @@ sub irc {
 	&ERROR("If this is still a problem, please contact the maintainer.");
 	return 1;
     }
+    $conn->maxlinelen($maxlinelen);
 
     if ($param{'ircNick2'}) {
 	# prep for real multiple nick/server connects
 	# FIXME: all code should get nick/server out of self, not config
 	$args{'Nick'} = $param{'ircNick2'};
 	my $conn = $irc->newconn(%args);
+	$conn->maxlinelen($maxlinelen);
     }
 
     if ($param{'ircNick3'}) {
@@ -122,6 +125,7 @@ sub irc {
 	# FIXME: all code should get nick/server out of self, not config
 	$args{'Nick'} = $param{'ircNick3'};
 	my $conn = $irc->newconn(%args);
+	$conn->maxlinelen($maxlinelen);
     }
 
     &clearIRCVars();