[cvslog] Module eggdrop1.7: Change committed

cvslog cvs at tsss.org
Sun Oct 21 01:05:01 CST 2001


CVSROOT    : /usr/local/cvsroot
Module     : eggdrop1.7
Commit time: 2001-10-21 06:04:53 UTC
Commited by: stdarg <stdarg at techmonkeys.org>

Modified files:
     scripts/action.fix.tcl

Log message:

Updated action.fix.tcl to use new filt_string.

---------------------- diff included ----------------------
Index: eggdrop1.7/scripts/action.fix.tcl
diff -u eggdrop1.7/scripts/action.fix.tcl:1.3 eggdrop1.7/scripts/action.fix.tcl:1.4
--- eggdrop1.7/scripts/action.fix.tcl:1.3	Tue Dec 21 11:35:07 1999
+++ eggdrop1.7/scripts/action.fix.tcl	Sun Oct 21 01:04:43 2001
@@ -3,16 +3,20 @@
 # Tothwolf  25May1999: cleanup
 # Tothwolf  04Oct1999: changed proc names slightly
 #
-# $Id: action.fix.tcl,v 1.3 1999/12/21 17:35:07 fabian Exp $
+# $Id: action.fix.tcl,v 1.4 2001/10/21 06:04:43 stdarg Exp $
 
 # fix for mirc dcc chat /me's
 bind filt - "\001ACTION *\001" filt:dcc_action
 proc filt:dcc_action {idx text} {
-  return ".me [string trim [join [lrange [split $text] 1 end]] \001]"
+  global filt_string
+  set filt_string ".me [string trim [join [lrange [split $text] 1 end]] \001]"
+  return 0
 }
 
 # fix for telnet session /me's
 bind filt - "/me *" filt:telnet_action
 proc filt:telnet_action {idx text} {
-  return ".me [join [lrange [split $text] 1 end]]"
+  global filt_string
+  set filt_string ".me [join [lrange [split $text] 1 end]]"
+  return 0
 }
----------------------- End of diff -----------------------



More information about the Changes mailing list