diff options
Diffstat (limited to 'scripts/ctrlact.pl')
| -rw-r--r-- | scripts/ctrlact.pl | 7 | 
1 files changed, 4 insertions, 3 deletions
| diff --git a/scripts/ctrlact.pl b/scripts/ctrlact.pl index 534b00a..aa9dcfb 100644 --- a/scripts/ctrlact.pl +++ b/scripts/ctrlact.pl @@ -111,7 +111,7 @@ use Carp qw( croak );  use Irssi;  use Text::ParseWords; -our $VERSION = '1.1'; +our $VERSION = '1.2';  our %IRSSI = (      authors     => 'martin f. krafft', @@ -119,7 +119,7 @@ our %IRSSI = (      name        => 'ctrlact',      description => 'allows per-channel control over activity indication',      license     => 'MIT', -    changed     => '2017-02-15' +    changed     => '2017-02-24'  );  ### DEFAULTS AND SETTINGS ###################################################### @@ -208,7 +208,8 @@ sub from_data_level {  sub walk_match_array {  	my ($name, $net, $type, @arr) = @_;  	foreach my $quadruplet (@arr) { -		my $netmatch = match($quadruplet->[0], $net); +		my $netmatch = $net eq '*' ? '(ignored)' +					: match($quadruplet->[0], $net);  		my $match = match($quadruplet->[1], $name);  		next unless $netmatch and $match; | 
