gitk: Add Ctrl-W shortcut for closing the active window
To make the user experience between git gui and gitk more homogeneous, use Ctrl-W in gitk for closing the active window. When closing the main window doquit is called for proper cleanup. Signed-off-by: Jens Lehmann <Jens.Lehmann@web.de> Signed-off-by: Paul Mackerras <paulus@samba.org>
Jens Lehmann committed
Feb 2, 2010 at 23:11 UTC
decd0a1ea594232f3b84831104257a0225be0085
1 file changed
+3
gitk
+3
@@ -2383,6 +2383,8 @@ proc makewindow {} {
2383
}
2384
bindall <$::BM> "canvscan mark %W %x %y"
2385
bindall <B$::BM-Motion> "canvscan dragto %W %x %y"
2386
+ bind all <$M1B-Key-w> {destroy [winfo toplevel %W]}
2387
+ bind . <$M1B-Key-w> doquit
2388
bindkey <Home> selfirstline
2389
bindkey <End> sellastline
2390
bind . <Key-Up> "selnextline -1"
@@ -2814,6 +2816,7 @@ proc keys {} {
2816
[mc "Gitk key bindings:"]
2817
2818
[mc "<%s-Q> Quit" $M1T]
2819
+[mc "<%s-W> Close window" $M1T]
2820
[mc "<Home> Move to first commit"]
2821
[mc "<End> Move to last commit"]
2822
[mc "<Up>, p, i Move up one commit"]