[68817] trunk/base/src/port1.0/portextract.tcl

[jmr at macports.org]

Revision: 68817
          http://trac.macports.org/changeset/68817
Author:   jmr at macports.org
Date:     2010-06-14 10:03:37 -0700 (Mon, 14 Jun 2010)
Log Message:
-----------
quote distfile path when running extract.cmd (#25246)

Modified Paths:
--------------
    trunk/base/src/port1.0/portextract.tcl

Modified: trunk/base/src/port1.0/portextract.tcl
===================================================================
--- trunk/base/src/port1.0/portextract.tcl	2010-06-14 16:55:42 UTC (rev 68816)
+++ trunk/base/src/port1.0/portextract.tcl	2010-06-14 17:03:37 UTC (rev 68817)
@@ -124,11 +124,11 @@
     foreach distfile [option extract.only] {
         ui_info "$UI_PREFIX [format [msgcat::mc "Extracting %s"] $distfile]"
         if {[file exists $filespath/$distfile]} {
-            option extract.args "$filespath/$distfile"
+            option extract.args "'$filespath/$distfile'"
         } elseif {![file exists "[option distpath]/$distfile"] && !$usealtworkpath && [file exists "${altprefix}[option distpath]/$distfile"]} {
-            option extract.args "${altprefix}[option distpath]/$distfile"
+            option extract.args "'${altprefix}[option distpath]/$distfile'"
         } else {
-            option extract.args "[option distpath]/$distfile"
+            option extract.args "'[option distpath]/$distfile'"
         }
         if {[catch {command_exec extract} result]} {
             return -code error "$result"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100614/c345a055/attachment.html>