git-gui: update shortcut tools to use _gitworktree
Signed-off-by: Giuseppe Bilotta <giuseppe.bilotta@gmail.com> Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
This commit is contained in:
parent
29e5573d1e
commit
3748b03d92
@ -2,6 +2,7 @@
|
||||
# Copyright (C) 2006, 2007 Shawn Pearce
|
||||
|
||||
proc do_windows_shortcut {} {
|
||||
global _gitworktree
|
||||
set fn [tk_getSaveFile \
|
||||
-parent . \
|
||||
-title [append "[appname] ([reponame]): " [mc "Create Desktop Icon"]] \
|
||||
@ -15,7 +16,7 @@ proc do_windows_shortcut {} {
|
||||
[info nameofexecutable] \
|
||||
[file normalize $::argv0] \
|
||||
] \
|
||||
[file dirname [file normalize [gitdir]]]
|
||||
[file normalize [$_gitworktree]]
|
||||
} err]} {
|
||||
error_popup [strcat [mc "Cannot write shortcut:"] "\n\n$err"]
|
||||
}
|
||||
@ -23,7 +24,7 @@ proc do_windows_shortcut {} {
|
||||
}
|
||||
|
||||
proc do_cygwin_shortcut {} {
|
||||
global argv0
|
||||
global argv0 _gitworktree
|
||||
|
||||
if {[catch {
|
||||
set desktop [exec cygpath \
|
||||
@ -56,7 +57,7 @@ proc do_cygwin_shortcut {} {
|
||||
$sh -c \
|
||||
"CHERE_INVOKING=1 source /etc/profile;[sq $me] &" \
|
||||
] \
|
||||
[file dirname [file normalize [gitdir]]]
|
||||
[file normalize [$_gitworktree]]
|
||||
} err]} {
|
||||
error_popup [strcat [mc "Cannot write shortcut:"] "\n\n$err"]
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user