Changeset 81832

Timestamp:

08/05/11 10:47:38 (4 years ago)

Author:

jmr@…

Message:

need to eval the command line after all

File:

• trunk/base/src/macports1.0/macports.tcl (modified) (2 diffs)

trunk/base/src/macports1.0/macports.tcl

@@ -1185 +1185 @@
     set tarflags [get_tar_flags [file extension $fetchfile]]
     set qflag ${macports::autoconf::tar_q}
-    set cmdline "$tarcmd ${tarflags}${qflag}xOf '$fetchfile' +CONTENTS"
+    set cmdline "$tarcmd ${tarflags}${qflag}xOf \"$fetchfile\" +CONTENTS"
     ui_debug "$cmdline"
-    if {![catch {set contents [exec $cmdline]}]} {
+    if {![catch {set contents [eval exec $cmdline]}]} {
         set binary 1
         ui_debug "getting port name from binary archive"
@@ -1208 +1208 @@
     ui_debug "extracting port archive to [pwd]"
     if {$binary} {
-        set cmdline "$tarcmd ${tarflags}${qflag}xOf {$fetchfile} +PORTFILE > Portfile"
-    } else {
-        set cmdline "$tarcmd ${tarflags}xf {$fetchfile}"
+        set cmdline "$tarcmd ${tarflags}${qflag}xOf \"$fetchfile\" +PORTFILE > Portfile"
+    } else {
+        set cmdline "$tarcmd ${tarflags}xf \"$fetchfile\""
     }
     ui_debug "$cmdline"