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,$_);
|