undef/git-commit-vandalism
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

git-gui: update shortcut tools to use _gitworktree

Browse Source 
Signed-off-by: Giuseppe Bilotta <giuseppe.bilotta@gmail.com>
Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
This commit is contained in:
Giuseppe Bilotta 2010-01-23 11:03:38 +01:00 committed by Shawn O. Pearce
parent 29e5573d1e
commit 3748b03d92
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lib/shortcut.tcl
View File

@ -2,6 +2,7 @@
# Copyright (C) 2006, 2007 Shawn Pearce # Copyright (C) 2006, 2007 Shawn Pearce
proc do_windows_shortcut {} { proc do_windows_shortcut {} {
global _gitworktree
set fn [tk_getSaveFile \ set fn [tk_getSaveFile \
-parent . \ -parent . \
-title [append "[appname] ([reponame]): " [mc "Create Desktop Icon"]] \ -title [append "[appname] ([reponame]): " [mc "Create Desktop Icon"]] \
@ -15,7 +16,7 @@ proc do_windows_shortcut {} {
[info nameofexecutable] \ [info nameofexecutable] \
[file normalize $::argv0] \ [file normalize $::argv0] \
] \ ] \
[file dirname [file normalize [gitdir]]] [file normalize [$_gitworktree]]
} err]} { } err]} {
error_popup [strcat [mc "Cannot write shortcut:"] "\n\n$err"] error_popup [strcat [mc "Cannot write shortcut:"] "\n\n$err"]
} }
@ -23,7 +24,7 @@ proc do_windows_shortcut {} {
} }
proc do_cygwin_shortcut {} { proc do_cygwin_shortcut {} {
global argv0 global argv0 _gitworktree
if {[catch { if {[catch {
set desktop [exec cygpath \ set desktop [exec cygpath \
@ -56,7 +57,7 @@ proc do_cygwin_shortcut {} {
$sh -c \ $sh -c \
"CHERE_INVOKING=1 source /etc/profile;[sq $me] &" \ "CHERE_INVOKING=1 source /etc/profile;[sq $me] &" \
] \ ] \
[file dirname [file normalize [gitdir]]] [file normalize [$_gitworktree]]
} err]} { } err]} {
error_popup [strcat [mc "Cannot write shortcut:"] "\n\n$err"] error_popup [strcat [mc "Cannot write shortcut:"] "\n\n$err"]
} }