very nice typo for regex, Angel indirectly found this :)

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@200 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/blootbot/src/Misc.pl b/blootbot/src/Misc.pl
index 22bef8f46c84f3386effabf5028c00167e5ec4b8..a593c3fbdaf9fe8eacff4cd1c89e5e40c4e9a7f2 100644 (file)
--- a/blootbot/src/Misc.pl
+++ b/blootbot/src/Misc.pl
@@ -395,7 +395,7 @@ sub IsHostMatch {
     # auth if 1) user and host match 2) user and nick match.
     # this may change in the future.
 
-    if ($this{'user'} =~ /^\Q$local{'user'}$/i) {
+    if ($this{'user'} =~ /^\Q$local{'user'}\E$/i) {
        return 2 if ($this{'host'} eq $local{'host'});
        return 1 if ($this{'nick'} eq $local{'nick'});
     }
@@ -609,6 +609,7 @@ sub Forker {
        &shmWrite($shm,"SET FORKPID $label $$");
     }
 
+    ### TODO: use AUTOLOAD
     if (!&loadMyModule($myModules{$label})) {
        &DEBUG("Forker: failed?");
        return;