[95618] branches/release_2_1
jmr at macports.org
jmr at macports.org
Tue Jul 17 18:05:55 PDT 2012
Revision: 95618
https://trac.macports.org/changeset/95618
Author: jmr at macports.org
Date: 2012-07-17 18:05:54 -0700 (Tue, 17 Jul 2012)
Log Message:
-----------
merge r95480 from trunk:
cope with missing image dirs in images_to_archives
Revision Links:
--------------
https://trac.macports.org/changeset/95480
Modified Paths:
--------------
branches/release_2_1/base/src/images_to_archives.tcl
Property Changed:
----------------
branches/release_2_1/
branches/release_2_1/base/
Property changes on: branches/release_2_1
___________________________________________________________________
Modified: svn:mergeinfo
- /trunk:91825,91829,91834,92072,92342,92404,92546,92730,92785,92881,92903,92976,93062,93153,93197,93250,93258-93259,93261,93268,93274,93303,93339,93511-93512,93816,93962,95382,95438-95439,95616
+ /trunk:91825,91829,91834,92072,92342,92404,92546,92730,92785,92881,92903,92976,93062,93153,93197,93250,93258-93259,93261,93268,93274,93303,93339,93511-93512,93816,93962,95382,95438-95439,95480,95616
Property changes on: branches/release_2_1/base
___________________________________________________________________
Modified: svn:mergeinfo
- /branches/gsoc08-privileges/base:37343-46937
/branches/gsoc09-logging/base:51231-60371
/branches/gsoc11-rev-upgrade/base:78828-88375
/branches/universal-sanity/base:51872-52323
/branches/variant-descs-14482/base:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
/trunk/base:91825,91829,91834,92072,92342,92404,92546,92730,92785,92881,92903,92976,93062,93129,93153,93197,93250,93256,93258-93259,93261,93268,93274,93303,93339,93511-93512,93816,93962,95382,95438-95439,95616
/users/perry/base-bugs_and_notes:45682-46060
/users/perry/base-select:44044-44692
+ /branches/gsoc08-privileges/base:37343-46937
/branches/gsoc09-logging/base:51231-60371
/branches/gsoc11-rev-upgrade/base:78828-88375
/branches/universal-sanity/base:51872-52323
/branches/variant-descs-14482/base:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
/trunk/base:91825,91829,91834,92072,92342,92404,92546,92730,92785,92881,92903,92976,93062,93129,93153,93197,93250,93256,93258-93259,93261,93268,93274,93303,93339,93511-93512,93816,93962,95382,95438-95439,95480,95616
/users/perry/base-bugs_and_notes:45682-46060
/users/perry/base-select:44044-44692
Modified: branches/release_2_1/base/src/images_to_archives.tcl
===================================================================
--- branches/release_2_1/base/src/images_to_archives.tcl 2012-07-18 00:53:40 UTC (rev 95617)
+++ branches/release_2_1/base/src/images_to_archives.tcl 2012-07-18 01:05:54 UTC (rev 95618)
@@ -92,19 +92,21 @@
set targetdir [file dirname $location]
} else {
set targetdir [file join ${macports::registry.path} software ${iname}]
- file mkdir $targetdir
+ }
+ if {$location == "" || ![file isdirectory $location]} {
set contents [$iref imagefiles]
}
+ file mkdir $targetdir
set newlocation [file join $targetdir $archivename]
if {$found} {
file rename $oldarchivefullpath $newlocation
- } elseif {$installtype == "image"} {
+ } elseif {$installtype == "image" && [file isdirectory $location]} {
# create archive from image dir
- system "cd $location && $tarcmd -cjf $newlocation * > ${targetdir}/error.log 2>&1"
+ system -W $location "$tarcmd -cjf $newlocation * > ${targetdir}/error.log 2>&1"
file delete -force ${targetdir}/error.log
} else {
- # direct mode, create archive from installed files
+ # direct mode (or missing image dir), create archive from installed files
# we tell tar to read filenames from a file so as not to run afoul of command line length limits
set fd [open ${targetdir}/tarlist w]
foreach entry $contents {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20120717/e5e43e6e/attachment-0001.html>
More information about the macports-changes
mailing list