lock sedbot down a bit

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

diff --git a/src/IRC/IrcHelpers.pl b/src/IRC/IrcHelpers.pl
index ccc0d403dbe6533546d0929b0893bd8e77520fea..ea4fd0f8856ef1806bafdf07cdc01da13796dd9e 100644 (file)
--- a/src/IRC/IrcHelpers.pl
+++ b/src/IRC/IrcHelpers.pl
@@ -235,7 +235,7 @@ sub hookMsg {
            $msgType =~ /public/ and
             $orig{message} =~ /^s\/([^;\/]*)\/([^;\/]*)\/([g]*)$/) {
        my $sedmsg = $seencache{$who}{'msg'};
-       eval "\$sedmsg =~ s/$1/$2/$3;"
+       eval "\$sedmsg =~ s/\Q$1\E/\Q$2\E/$3;"
        &DEBUG("sed \"$orig{message}\" \"$sedmsg\"");
        &msg($talkchannel, "$orig{who} meant: $sedmsg");
     } elsif ((!$skipmessage or &IsChanConf('seenStoreAll') > 0) and