From e4c6433ef30c7dc3d2734b204e8f8d0510584a79 Mon Sep 17 00:00:00 2001
From: William Heimbigner <william.heimbigner@gmail.com>
Date: Wed, 24 Dec 2008 19:35:56 +0000
Subject: fixed ;rehash so it will also rehash the string blacklist; moved
 ;rehash exempts into ;rehash

---
 config-default/commands.xml | 19 +++++++++----------
 1 file changed, 9 insertions(+), 10 deletions(-)

(limited to 'config-default')

diff --git a/config-default/commands.xml b/config-default/commands.xml
index efe65e1..f9abcc5 100644
--- a/config-default/commands.xml
+++ b/config-default/commands.xml
@@ -241,6 +241,15 @@
   <command cmd="^;rehash$" flag="a">
   <![CDATA[
     ASM::XML->readXML();
+    my @strbl = io('string_blacklist.txt')->getlines;
+    chomp @strbl;
+    @::string_blacklist = @strbl;
+    my @eline=io('exempt.txt')->getlines;
+    chomp @eline;
+    %::eline = ();
+    foreach my $item (@eline) {
+	$::eline{lc $item} = 1;
+    }
     $conn->privmsg($event->{to}->[0], 'config files were re-read');
   ]]>
   </command>
@@ -272,16 +281,6 @@
     $conn->privmsg($_, "[\x02$tgt\x02] - $event->{nick} wants op attention ($msg) $hilite") foreach ASM::Util->getAlert($tgt, '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>
   <command cmd="^;blacklist (.*)" flag="o">
   <![CDATA[
     my $str = lc $1;
-- 
cgit v1.2.3