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>
This commit is contained in:
7
git-gui
7
git-gui
@ -1205,9 +1205,10 @@ set mainfont {Helvetica 10}
|
|||||||
set difffont {Courier 10}
|
set difffont {Courier 10}
|
||||||
set maincursor [. cget -cursor]
|
set maincursor [. cget -cursor]
|
||||||
|
|
||||||
switch -- $tcl_platform(platform) {
|
switch -glob -- "$tcl_platform(platform),$tcl_platform(os)" {
|
||||||
windows {set M1B Control; set M1T Ctrl}
|
windows,* {set M1B Control; set M1T Ctrl}
|
||||||
default {set M1B M1; set M1T M1}
|
unix,Darwin {set M1B M1; set M1T Cmd}
|
||||||
|
default {set M1B M1; set M1T M1}
|
||||||
}
|
}
|
||||||
|
|
||||||
# -- Menu Bar
|
# -- Menu Bar
|
||||||
|
Reference in New Issue
Block a user