Changeset 6550

Show
Ignore:
Timestamp:
02/11/08 16:07:34 (6 years ago)
Author:
woremacx
Message:

lang/perl/POE-Component-Client-Nowa: oops. don't put local channel name

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/POE-Component-Client-Nowa/trunk/bin/nowa2ircd.pl

    r6549 r6550  
    212212 
    213213    my $nick = ( $user =~ m/^(.*)!/)[0]; 
    214     $heap->{nowa}->yield(update => "$channel $text"); 
     214    unless ($channel eq $conf->{channel}) { 
     215        $text = "$channel $text"; 
     216    } 
     217    $heap->{nowa}->yield(update => $text); 
    215218} 
    216219