git-gui: bring wish process to front on Mac
On Mac OS X, any application that is started from the Terminal will open behind all running applications; as a work-around, manually bring ourselves to the front. (Stolen from gitk, commit 76bf6ff93e.) We do this as the very first thing, so that any message boxes that might pop up during the rest of the startup sequence are actually seen by the user. [PT: added catch and moved down to ensure Tk has been loaded] Signed-off-by: Stefan Haller <stefan@haller-berlin.de> Signed-off-by: Pat Thoyts <patthoyts@users.sourceforge.net>
Stefan Haller committed
Jun 6, 2013 at 10:17 UTC
7d2017e7738ace254d0b653ce844d07af8ecf026
1 file changed
+14
git-gui.sh
+14
@@ -135,6 +135,20 @@ proc strcat {args} {
135
::msgcat::mcload $oguimsg
136
unset oguimsg
137
138
+######################################################################
139
+##
140
+## On Mac, bring the current Wish process window to front
141
+
142
+if {[tk windowingsystem] eq "aqua"} {
143
+ catch {
144
+ exec osascript -e [format {
145
+ tell application "System Events"
146
+ set frontmost of processes whose unix id is %d to true
147
+ end tell
148
+ } [pid]]
149
+ }
150
+}
151
+
152
######################################################################
153
##
154
## read only globals