[91363] trunk/base/src/package1.0/portarchivefetch.tcl

[jmr at macports.org]

Revision: 91363
          https://trac.macports.org/changeset/91363
Author:   jmr at macports.org
Date:     2012-03-30 13:22:21 -0700 (Fri, 30 Mar 2012)
Log Message:
-----------
don't fail due to missing archive defaults

Modified Paths:
--------------
    trunk/base/src/package1.0/portarchivefetch.tcl

Modified: trunk/base/src/package1.0/portarchivefetch.tcl
===================================================================
--- trunk/base/src/package1.0/portarchivefetch.tcl	2012-03-30 20:21:06 UTC (rev 91362)
+++ trunk/base/src/package1.0/portarchivefetch.tcl	2012-03-30 20:22:21 UTC (rev 91363)
@@ -83,11 +83,16 @@
 
     set ret {}
     foreach site [array names portfetch::mirror_sites::archive_prefix] {
+        set missing 0
         foreach var {archive_frameworks_dir archive_applications_dir archive_type} {
             if {![info exists portfetch::mirror_sites::${var}($site)]} {
                 ui_warn "no $var configured for site '$site'"
+                set missing 1
             }
         }
+        if {$missing} {
+            continue
+        }
         if {$portfetch::mirror_sites::archive_prefix($site) == $prefix &&
             $portfetch::mirror_sites::archive_frameworks_dir($site) == $frameworks_dir &&
             $portfetch::mirror_sites::archive_applications_dir($site) == $applications_dir &&
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20120330/b8d47e6d/attachment.html>