[Tkabber-dev] r1945 - in trunk/tkabber: . plugins/chat

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Thu Oct 14 18:08:42 MSD 2010


Author: sergei
Date: 2010-10-14 18:08:42 +0400 (Thu, 14 Oct 2010)
New Revision: 1945

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/plugins/chat/popupmenu.tcl
Log:
	* plugins/chat/popupmenu.tcl: Switched "search in Google" shortcut to
	  Ctrl-H to avoid conflict with postpone plugin.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2010-10-11 18:26:46 UTC (rev 1944)
+++ trunk/tkabber/ChangeLog	2010-10-14 14:08:42 UTC (rev 1945)
@@ -1,3 +1,8 @@
+2010-10-14  Sergei Golovan  <sgolovan at nes.ru>
+
+	* plugins/chat/popupmenu.tcl: Switched "search in Google" shortcut to
+	  Ctrl-H to avoid conflict with postpone plugin.
+
 2010-10-11  Konstantin Khomoutov  <flatworm at users.sourceforge.net>
 
 	* plugins/general/remote.tcl: Implement special processing

Modified: trunk/tkabber/plugins/chat/popupmenu.tcl
===================================================================
--- trunk/tkabber/plugins/chat/popupmenu.tcl	2010-10-11 18:26:46 UTC (rev 1944)
+++ trunk/tkabber/plugins/chat/popupmenu.tcl	2010-10-14 14:08:42 UTC (rev 1945)
@@ -15,8 +15,8 @@
 	bind . <Shift-F2>  [list [namespace current]::BookmarkNext .]
 	catch {bind . <XF86_Switch_VT_2>  [list [namespace current]::BookmarkNext .]}
 	bind . <F2>        [list [namespace current]::BookmarkPrev .]
-	bind . <Control-G> [list [namespace current]::GoogleSelection .]
-	bind . <Control-g> [list [namespace current]::GoogleSelection .]
+	bind . <Control-H> [list [namespace current]::GoogleSelection .]
+	bind . <Control-h> [list [namespace current]::GoogleSelection .]
     }
 }
 
@@ -31,8 +31,8 @@
 	bind $top <Shift-F2>  [list [namespace current]::BookmarkNext [double% $cw]]
 	catch {bind $top <XF86_Switch_VT_2>  [list [namespace current]::BookmarkNext [double% $cw]]}
 	bind $top <F2>        [list [namespace current]::BookmarkPrev [double% $cw]]
-	bind $top <Control-G> [list [namespace current]::GoogleSelection [double% $cw]]
-	bind $top <Control-g> [list [namespace current]::GoogleSelection [double% $cw]]
+	bind $top <Control-H> [list [namespace current]::GoogleSelection [double% $cw]]
+	bind $top <Control-h> [list [namespace current]::GoogleSelection [double% $cw]]
     }
 }
 
@@ -66,7 +66,7 @@
     $m add command -label [::msgcat::mc "Copy selection to clipboard"] \
         -command [list [namespace current]::CopySelection $W] \
 	-state $state
-    $m add command -label [::msgcat::mc "Google selection"] -accelerator Ctrl-G \
+    $m add command -label [::msgcat::mc "Google selection"] -accelerator Ctrl-H \
         -command [list [namespace current]::GoogleSelection $W]\
 	-state $state
 }



More information about the Tkabber-dev mailing list