summaryrefslogtreecommitdiff
path: root/git-gui
diff options
context:
space:
mode:
authorLibravatar Shawn O. Pearce <spearce@spearce.org>2006-11-07 00:53:39 -0500
committerLibravatar Shawn O. Pearce <spearce@spearce.org>2006-11-07 03:05:18 -0500
commit661448922fd55b907449962d35d3fdb92397ce9d (patch)
tree1693f5bf4eee11e767f3554ac8298590f11c0c2e /git-gui
parentgit-gui: Reorganized startup procedure to ensure gitdir is right. (diff)
downloadtgif-661448922fd55b907449962d35d3fdb92397ce9d.tar.xz
git-gui: Fix menu item accelerator display on Mac OS X.
Apparently accelerators really only work correctly for function keys (F1-F12) and "Cmd-q". Apparently wish on Mac OS X reports itself as unix and the OS is Darwin, this makes it a little difficult to be sure we are running under Aqua. Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
Diffstat (limited to 'git-gui')
-rwxr-xr-xgit-gui7
1 files changed, 4 insertions, 3 deletions
diff --git a/git-gui b/git-gui
index 87dcbaef4c..0bbb0064f0 100755
--- a/git-gui
+++ b/git-gui
@@ -1205,9 +1205,10 @@ set mainfont {Helvetica 10}
set difffont {Courier 10}
set maincursor [. cget -cursor]
-switch -- $tcl_platform(platform) {
-windows {set M1B Control; set M1T Ctrl}
-default {set M1B M1; set M1T M1}
+switch -glob -- "$tcl_platform(platform),$tcl_platform(os)" {
+windows,* {set M1B Control; set M1T Ctrl}
+unix,Darwin {set M1B M1; set M1T Cmd}
+default {set M1B M1; set M1T M1}
}
# -- Menu Bar