From 508b7b1123ea479caed7af68ffd9f90ffcc37281 Mon Sep 17 00:00:00 2001 From: Nick White Date: Tue, 25 Sep 2012 23:14:49 +0100 Subject: Stop using dirty and dangerous PATH hack --- getxbookgui.tcl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'getxbookgui.tcl') 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 -- cgit v1.2.3