]> git.pld-linux.org Git - packages/git-core.git/blame - git-core-key-bindings.patch
- fix for key bindings in SHA1 bar
[packages/git-core.git] / git-core-key-bindings.patch
CommitLineData
b2c254f3
KK
1From 2ad6d3e9325a39333be0c4b9094e9d5e756dea65 Mon Sep 17 00:00:00 2001
2From: Kacper <kornet@tuptus>
3Date: Thu, 9 Dec 2010 18:57:06 +0000
4Subject: [PATCH] Preserve Entry class key bindings for SHA id
5
6If bind is specified for key without any modifier, then any combination
7of modifiers may be present in the event. So bind $e $ev "$escript;
8break" breaks some useful bindings from Entry class (for example
9Ctrl+k).
10---
11 gitk | 10 +++++-----
12 1 files changed, 5 insertions(+), 5 deletions(-)
13
14diff --git gitk-git/gitk gitk-git/gitk
15index 45e3380..0c6f3af 100755
16--- gitk-git/gitk
17+++ gitk-git/gitk
18@@ -2365,6 +2365,10 @@ proc makewindow {} {
19 }
20 }
21
22+ foreach e $entries {
23+ bindtags $e [linsert [bindtags $e] 2 entrybind]
24+ }
25+
26 bind .pwbottom <Configure> {resizecdetpanes %W %w}
27 pack .ctop -fill both -expand 1
28 bindall <1> {selcanvline %W %x %y}
29@@ -2563,12 +2567,8 @@ proc scrollcanv {cscroll f0 f1} {
30 proc bindkey {ev script} {
31 global entries
32 bind . $ev $script
33- set escript [bind Entry $ev]
34- if {$escript == {}} {
35- set escript [bind Entry <Key>]
36- }
37 foreach e $entries {
38- bind $e $ev "$escript; break"
39+ bind entrybind $ev "break"
40 }
41 }
42
43--
441.7.3.3
45
This page took 0.04642 seconds and 4 git commands to generate.