[Tkabber-dev] r232 - trunk/plugins/hidemuctopic

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Fri Oct 9 15:43:56 MSD 2009


Author: kostix
Date: 2009-10-09 15:43:55 +0400 (Fri, 09 Oct 2009)
New Revision: 232

Modified:
   trunk/plugins/hidemuctopic/hidemuctopic.tcl
Log:
Add break to <<ToggleTopicWindow>> binding

This prevents propagation of the event further down
which, in the case of the default binding (C-t) also
performed the "swap characters" command in the text widget
(serving as the chat input window).


Modified: trunk/plugins/hidemuctopic/hidemuctopic.tcl
===================================================================
--- trunk/plugins/hidemuctopic/hidemuctopic.tcl	2009-08-19 16:37:13 UTC (rev 231)
+++ trunk/plugins/hidemuctopic/hidemuctopic.tcl	2009-10-09 11:43:55 UTC (rev 232)
@@ -45,8 +45,10 @@
 	set ix [lsearch -exact $slaves $tw]
 	lappend pinfo -before [lindex $slaves [expr {$ix + 1}]]
 
-	bind [chat::input_win $chatid] <<ToggleTopicWindow>> \
+	set iw [chat::input_win $chatid]
+	bind $iw <<ToggleTopicWindow>> \
 		[list [namespace current]::toggle [double% $chatid]]
+	bind $iw <<ToggleTopicWindow>> +break
 
 	if {$options(hidden_by_default) && ![winfo ismapped $tw]} {
 		bind $tw <Map> {



More information about the Tkabber-dev mailing list