1 set gitexecdir
{@@gitexecdir
@@}
2 set gitguilib
{@@GITGUI_LIBDIR
@@}
3 set env
(PATH
) "$gitexecdir:$env(PATH)"
5 if {[string first
-psn [lindex $argv 0]] == 0} {
6 lset argv
0 [file join $gitexecdir git-gui
]
9 if {[file tail
[lindex $argv 0]] eq
{gitk
}} {
10 set argv0
[lindex $argv 0]
11 set AppMain_source
$argv0
13 set argv0
[file join $gitexecdir [file tail
[lindex $argv 0]]]
14 set AppMain_source
[file join $gitguilib git-gui.tcl
]
15 if {[info exists env
(PWD
)]} {
17 } elseif
{[pwd] eq
{/}} {
22 unset gitexecdir gitguilib
23 set argv
[lrange $argv 1 end
]
24 source $AppMain_source