112648dd6b
* 'master' of https://github.com/j6t/git-gui: (21 commits)
git-gui: ensure own version of git-gui--askpass is used
git-gui: Allow Tcl 9.0
git-gui: use -profile tcl8 on encoding conversions
git-gui: use -profile tcl8 for file input with Tcl 9
git-gui: themed.tcl: use full namespace for color
git-gui: remove EOL translation for gets
git-gui: honor TCLTK_PATH in git-gui--askpass
git-gui: retire Git Gui.app
git-gui: fix dependency of GITGUI_MAIN on generator
git-gui: remove uname_O in Makefile
git-gui i18n: Remove the locations within the Bulgarian translation
git-gui i18n: Update Bulgarian translation (557t)
git-gui: do not mix -translation binary and -encoding
git-gui: replace encoding binary with iso8859-1
git-gui: translation binary defines iso8859-1
git-gui: assure -eofchar {} on all channels
git-gui: use /cmd/git-gui.exe for shortcut
git-gui: Windows tk_getSaveFile is not useful for shortcuts
git-gui: let nice work on Windows
git-gui: do not add directories to PATH on Windows
...
18 lines
451 B
Bash
Executable File
18 lines
451 B
Bash
Executable File
#!/bin/sh
|
|
# Tcl ignores the next line -*- tcl -*- \
|
|
exec wish "$0" -- "$@"
|
|
|
|
if { $argc >=2 && [lindex $argv 0] == "--working-dir" } {
|
|
set workdir [lindex $argv 1]
|
|
cd $workdir
|
|
if {[lindex [file split $workdir] end] eq {.git}} {
|
|
# Workaround for Explorer right click "Git GUI Here" on .git/
|
|
cd ..
|
|
}
|
|
set argv [lrange $argv 2 end]
|
|
incr argc -2
|
|
}
|
|
|
|
set thisdir [file normalize [file dirname [info script]]]
|
|
source [file join $thisdir git-gui.tcl]
|