# OFTC now supports +q/-q.
#quiet => 'ban',
#unquiet => 'unban',
- timeout => 'btimeout',
+ #timeout => 'btimeout',
);
for my $key (keys %fn_mapping) {
if ($$cmd{$key}) {
sub i_want {
my $action = shift;
- return "I've wanted to $action->{type} $action->{nick} off $action->{channel} on $action->{network} since $action->{inserted}";
+ return "I've wanted to ".join(',', keys %{$action->{type}||{'do something to'=>undef}}).
+ " $action->{nick} off $action->{channel} on $action->{network} since $action->{inserted}";
}
sub take_action {
Irssi::print(i_want($actions->{$_})) if $DEBUG;
# Find the server to take action on
my $server = Irssi::server_find_chatnet($actions->{$_}->{network});
- Irssi::print("Unable to find server for chatnet: $actions->{$_}->{network}") and return if not defined $server;
+ if (not defined $server) {
+ Irssi::print("Unable to find server for chatnet: $actions->{$_}->{network}");
+ return;
+ }
Irssi::print("Found server for chatnet: $actions->{$_}->{network}") if $DEBUG;
# Find the channel to take action on
my $s_channel = $server->channel_find($actions->{$_}->{channel});
- Irssi::print("Unable to find channel for channel: $actions->{$_}->{channel}") and return if not defined $s_channel;
+ if (not defined $s_channel){
+ Irssi::print("Unable to find channel for channel: $actions->{$_}->{channel}");
+ return;
+ }
Irssi::print("Found channel for channel: $actions->{$_}->{channel}") if $DEBUG;
# Are we opped on that channel?
if ($s_channel->{chanop}) { # Yes? Take the action against the user.