diff options
| author | Nick White <git@njw.me.uk> | 2012-09-25 23:14:49 +0100 |
|---|---|---|
| committer | Nick White <git@njw.me.uk> | 2012-09-25 23:14:49 +0100 |
| commit | 508b7b1123ea479caed7af68ffd9f90ffcc37281 (patch) | |
| tree | ea2453507278fd7fc01dff421fde1e490e3ae877 /getxbookgui.tcl | |
| parent | 0e5aa70532abf872179b173cbd2711ade0ccd13b (diff) | |
Stop using dirty and dangerous PATH hack
Diffstat (limited to 'getxbookgui.tcl')
| -rwxr-xr-x | getxbookgui.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/getxbookgui.tcl b/getxbookgui.tcl index eb3c863..2cc9b96 100755 --- a/getxbookgui.tcl +++ b/getxbookgui.tcl @@ -12,7 +12,6 @@ set cmdselected 0 set dling 0 set manual 0 -set env(PATH) "[file dirname $::argv0]:$env(PATH)" set iconpath [file join [file dirname $::argv0] icons] proc updateStatus {chan} { @@ -46,7 +45,8 @@ proc go {} { if { [.input.id get] == "" } { return } - set cmd "[lindex [lindex $cmds $cmdselected] 0] [.input.id get]" + set cmdbin [lindex [lindex $cmds $cmdselected] 0] + set cmd "$cmdbin [.input.id get]" set dling 1 .dl configure -state disabled -text "Downloading" .input.id configure -state readonly |