diff options
Diffstat (limited to 'config-default/commands.xml')
| -rw-r--r-- | config-default/commands.xml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml index 8fb62c9..b1b1ec9 100644 --- a/config-default/commands.xml +++ b/config-default/commands.xml @@ -475,14 +475,13 @@ <command cmd="^;join (\S+)" flag="a"> <![CDATA[ my $chan = lc $1; - use List::Util qw(none); unless (defined($::channels->{channel}->{$chan})) { $::channels->{channel}->{$chan} = { }; ASM::XML->writeChannels(); } $conn->join($chan); my @autojoins = @{$::settings->{autojoins}}; - if (none { $chan eq lc $_ } @autojoins) { + if (!grep { $chan eq lc $_ } @autojoins) { @autojoins = (@autojoins, $chan); $::settings->{autojoins} = \@autojoins; ASM::XML->writeSettings(); |