On 6 June 2013 09:17, Stefan Haller <stefan@xxxxxxxxxxxxxxxx> wrote:
> 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.
>
> Signed-off-by: Stefan Haller <stefan@xxxxxxxxxxxxxxxx>
> ---
> git-gui.sh | 13 +++++++++++++
> 1 file changed, 13 insertions(+)
>
> diff --git a/git-gui.sh b/git-gui.sh
> index e133331..c464928 100755
> --- a/git-gui.sh
> +++ b/git-gui.sh
> @@ -29,6 +29,19 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA}]
>
> ######################################################################
> ##
> +## On Mac, bring the current Wish process window to front
> +
> +if {[tk windowingsystem] eq "aqua"} {
> + exec osascript -e [format {
> + tell application "System Events"
> + set frontmost of processes whose unix id is %d to true
> + end tell
> + } [pid] ]
> +}
> +
> +
> +######################################################################
> +##
> ## Tcl/Tk sanity check
>
> if {[catch {package require Tcl 8.4} err]
> --
> 1.8.3.14.g33f718c
>
Seems fine to me. I can't test this as I have no access to this
platform. Possibly you should run this in a catch statement so it can
ignore any errors and I would tend to use the 'auto_execok' command to
ensure that osascript actually exists. Something like
set arg [format {tell application......}]
catch {exec {*}[auto_execok osascript] -e $arg [pid]}
but possibly this is guaranteed to exist on all macs which would make
the above redundant. What I'm thinking is you dont want the app to
exit just because something goes wrong in this call.
--
To unsubscribe from this list: send the line "unsubscribe git" in
the body of a message to majordomo@xxxxxxxxxxxxxxx
More majordomo info at http://vger.kernel.org/majordomo-info.html