72a8e81d45
If we are building on Darwin (sometimes known as Mac OS X) and we find the Mac OS X Tk.framework in the expected location we build a proper Mac OS X application bundle with icons and info list. The git-gui and git-citool commands are modified to be very short shell scripts that just execute the application bundle, starting Tk with our own info list and icon set. Although the Makefile change here is rather large it makes for a much more pleasant user experience on Mac OS X as git-gui now has its own icon on the dock, in the standard tk_messageBox dialogs, and the application name now says "Git Gui" instead of "Wish" in locations such as the menu bar and the alt-tab window. Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
23 lines
568 B
Tcl
23 lines
568 B
Tcl
set gitexecdir {@@gitexecdir@@}
|
|
set gitguilib {@@GITGUI_LIBDIR@@}
|
|
set env(PATH) "$gitexecdir:$env(PATH)"
|
|
|
|
if {[string first -psn [lindex $argv 0]] == 0} {
|
|
lset argv 0 [file join $gitexecdir git-gui]
|
|
}
|
|
|
|
if {[file tail [lindex $argv 0]] eq {gitk}} {
|
|
set argv0 [file join $gitexecdir gitk]
|
|
set AppMain_source $argv0
|
|
} else {
|
|
set argv0 [file join $gitexecdir [file tail [lindex $argv 0]]]
|
|
set AppMain_source [file join $gitguilib git-gui.tcl]
|
|
if {[pwd] eq {/}} {
|
|
cd $env(HOME)
|
|
}
|
|
}
|
|
|
|
unset gitexecdir gitguilib
|
|
set argv [lrange $argv 1 end]
|
|
source $AppMain_source
|