550 |
save_message( channel => $channel, me => 1, nick => $nick, msg => $msg); |
save_message( channel => $channel, me => 1, nick => $nick, msg => $msg); |
551 |
|
|
552 |
if ( $use_twitter ) { |
if ( $use_twitter ) { |
553 |
if ( my $twitter = meta( $nick, $channel, 'twitter' ) ) { |
if ( my $twitter = meta( $nick, $NICK, 'twitter' ) ) { |
554 |
my ($login,$passwd) = split(/\s+/,$twitter,2); |
my ($login,$passwd) = split(/\s+/,$twitter,2); |
555 |
_log("sending twitter for $nick/$login on $channel "); |
_log("sending twitter for $nick/$login on $channel "); |
556 |
my $bot = Net::Twitter->new( username=>$login, password=>$passwd ); |
my $bot = Net::Twitter->new( username=>$login, password=>$passwd ); |