diff options
Diffstat (limited to 'config-default/commands.xml')
| -rw-r--r-- | config-default/commands.xml | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml index 6b36aa4..5e5f9e8 100644 --- a/config-default/commands.xml +++ b/config-default/commands.xml @@ -162,7 +162,7 @@ </command> <command cmd="^;rehash$" flag="a"> <![CDATA[ - readXML(); + ASM::XML->readXML(); $conn->privmsg($event->{to}->[0], 'config files were re-read'); ]]> </command> @@ -178,21 +178,25 @@ </command> <command cmd="^;exempt (.*)" flag="o"> <![CDATA[ - push(@::eline, $1); - "$1\n" >> io 'exempt.txt'; - $conn->privmsg($event->{to}->[0], "$1 exempted"); + $::eline{lc $1} = 1; + "lc $1\n" >> io 'exempt.txt'; + $conn->privmsg($event->{to}->[0], "lc $1 exempted"); ]]> </command> <command cmd="^\!ops *(.*)"> <![CDATA[ - my $hilite=commaAndify(getAlert($event->{to}->[0], 'opalert', 'hilights')); - $conn->privmsg($_, "$hilite: $event->{nick} wants your attention ($1) ") foreach getAlert($event->{to}->[0], 'opalert', 'msgs'); + my $hilite=ASM::Util->commaAndify(ASM::Util->getAlert($event->{to}->[0], 'opalert', 'hilights')); + $conn->privmsg($_, "$hilite: $event->{nick} wants your attention ($1) ") foreach ASM::Util->getAlert($event->{to}->[0], 'opalert', 'msgs'); ]]> </command> <command cmd="^;re(load|hash) exempts" flag="a"> <![CDATA[ @eline=io('exempt.txt')->getlines; chomp @eline; + %::eline = (); + foreach my $item (@eline) { + $::eline{lc $item} = 1; + } ]]> </command> </commands> |
