[63206] users/jmr/restore_ports/restore_ports.tcl

jmr at macports.org jmr at macports.org
Fri Jan 29 06:24:57 PST 2010


Revision: 63206
          http://trac.macports.org/changeset/63206
Author:   jmr at macports.org
Date:     2010-01-29 06:24:55 -0800 (Fri, 29 Jan 2010)
Log Message:
-----------
update

Modified Paths:
--------------
    users/jmr/restore_ports/restore_ports.tcl

Property Changed:
----------------
    users/jmr/restore_ports/restore_ports.tcl

Modified: users/jmr/restore_ports/restore_ports.tcl
===================================================================
--- users/jmr/restore_ports/restore_ports.tcl	2010-01-29 13:57:07 UTC (rev 63205)
+++ users/jmr/restore_ports/restore_ports.tcl	2010-01-29 14:24:55 UTC (rev 63206)
@@ -23,8 +23,9 @@
 proc dependenciesForPort {portName variantInfo} {
    set dependencyList [list]
    set portSearchResult [mportlookup $portName]
-   if {[llength $portSearchResult] < 1} {
-      return -code error "port \"$portName\" not found"
+   if {[llength $portSearchResult] < 2} {
+      ui_warn "Skipping $portName (not in the ports tree)"
+      return $dependencyList
    }
    array set portInfo [lindex $portSearchResult 1]
    set mport [mportopen $portInfo(porturl) {} $variantInfo]
@@ -81,7 +82,6 @@
         }
         lappend newList [list $active $name $variants]
     }
-    unset portList
 
     set operationList [list]
     while {[llength $newList] > 0} {
@@ -133,7 +133,7 @@
             return -code error "lookup of portname $name failed: $result"
         }
         if {[llength $res] < 2} {
-            ui_warn "Skipping $name (not in the ports tree)"
+            # not in the index, but we already warned about that earlier
             continue
         }
         array unset portinfo


Property changes on: users/jmr/restore_ports/restore_ports.tcl
___________________________________________________________________
Added: svn:eol-style
   + native
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100129/1e36c447/attachment.html>


More information about the macports-changes mailing list