From 661448922fd55b907449962d35d3fdb92397ce9d Mon Sep 17 00:00:00 2001 From: "Shawn O. Pearce" Date: Tue, 7 Nov 2006 00:53:39 -0500 Subject: [PATCH] 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 --- git-gui | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/git-gui b/git-gui index 87dcbaef4..0bbb0064f 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 -- 2.30.2