From: Andres S. <di...@us...> - 2005-02-11 20:47:02
|
Update of /cvsroot/tuxaator/tuxaator/Plugins In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21298/Plugins Modified Files: Output.pm Log Message: use actually working text wrap Index: Output.pm =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/Plugins/Output.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** Output.pm 8 Nov 2004 22:04:04 -0000 1.5 --- Output.pm 11 Feb 2005 20:46:51 -0000 1.6 *************** *** 31,41 **** my @msg = wrap("","",@_); ! #my @lines = split /\n/ => $self->{'prefix'} . join "" => @msg; ! if ($self->{'prefix'}) ! { ! $msg[0] = $self->{'prefix'} . $msg[0]; ! }; ! foreach (@msg) { $self->{'connection'}->privmsg($target,$_); --- 31,37 ---- my @msg = wrap("","",@_); ! my @lines = split /\n/ => $self->{'prefix'} . join "" => @msg; ! foreach (@lines) { $self->{'connection'}->privmsg($target,$_); |