Changeset 1063

Timestamp:

01/17/10 06:57:26 (2 years ago)

Author:

james

Message:

escape regexp chars that can appear in nicks (fix #169)

File:

• trunk/modules/system.tcl (modified) (1 diff)

trunk/modules/system.tcl

@@ -953 +953 @@
         global botnicks bMotionSettings botnick
 
+        set safe_botnick [string map { "|" "\\|" "^" "\\^" "{" "\\{" "}" "\\}" "\[" "\\\[" "\]" "\\\]" } $botnick]
         if {$botnicks == ""} {
                 if {[bMotion_setting_get "botnicks"] == ""} {
-                        set botnicks "($botnick) ?"
+                        set botnicks "($safe_botnick) ?"
                 } else {
-                        set botnicks "($botnick|$bMotionSettings(botnicks)) ?"
+                        set botnicks "($safe_botnick|$bMotionSettings(botnicks)) ?"
                 }
                 if {[bMotion_setting_get "botnicks_strict"] == 1} {