From: Anti V. <du...@us...> - 2004-11-08 22:04:17
|
Update of /cvsroot/tuxaator/tuxaator/Plugins In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12190 Modified Files: Output.pm Log Message: + kill a warning Index: Output.pm =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/Plugins/Output.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** Output.pm 13 Dec 2001 23:28:11 -0000 1.4 --- Output.pm 8 Nov 2004 22:04:04 -0000 1.5 *************** *** 31,37 **** my @msg = wrap("","",@_); ! my @lines = split /\n/ => $self->{'prefix'} . join "" => @msg; ! foreach (@lines) { $self->{'connection'}->privmsg($target,$_); --- 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,$_); |