Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/IRC/lib/BarnOwl/Module/IRC.pm

    recee82f r0c4a190  
    399399    $body =~ tr/\n\r/  /;
    400400    if ($body =~ /^\/me (.*)/) {
    401         $conn->conn->me($to, $1);
     401        $conn->conn->me($to, Encode::encode('utf-8', $1));
    402402        $body = '* '.$conn->nick.' '.$1;
    403403    } else {
    404         $conn->conn->privmsg($to, $body);
     404        $conn->conn->privmsg($to, Encode::encode('utf-8', $body));
    405405    }
    406406    my $msg = BarnOwl::Message->new(
     
    545545            $conn = get_connection_by_alias($alias);
    546546        }
    547         if($use_channel) {
     547        if(!$conn && $use_channel) {
    548548            $channel = $ARGV[0];
    549549            if(defined($channel) && $channel =~ /^#/) {
    550550                if($channels{$channel} && @{$channels{$channel}} == 1) {
    551551                    shift @ARGV;
    552                     $conn = $channels{$channel}[0] unless $conn;
     552                    $conn = $channels{$channel}[0];
     553                } 
     554            } else {
     555                if($m && $m->type eq 'IRC' && !$m->is_private) {
     556                    $channel = $m->channel;
     557                } else {
     558                    undef $channel;
    553559                }
    554             } elsif ($m && $m->type eq 'IRC' && !$m->is_private) {
    555                 $channel = $m->channel;
    556             } else {
    557                 undef $channel;
    558560            }
    559561        }
    560 
    561562        if(!$channel && $use_channel == REQUIRE_CHANNEL) {
    562563            die("Usage: $cmd <channel>\n");
Note: See TracChangeset for help on using the changeset viewer.