[138757] contrib/mpab/subports.tcl

[jmr at macports.org]

Revision: 138757
          https://trac.macports.org/changeset/138757
Author:   jmr at macports.org
Date:     2015-07-17 21:54:17 -0700 (Fri, 17 Jul 2015)
Log Message:
-----------
mpab: avoid adding duplicate ports to the build list when a subport (rather than a portdir) is listed in a forced build's portlist

Modified Paths:
--------------
    contrib/mpab/subports.tcl

Modified: contrib/mpab/subports.tcl
===================================================================
--- contrib/mpab/subports.tcl	2015-07-18 04:32:47 UTC (rev 138756)
+++ contrib/mpab/subports.tcl	2015-07-18 04:54:17 UTC (rev 138757)
@@ -69,10 +69,13 @@
     puts $portname
     exit 0
 }
-puts [lindex $one_result 0]
+
 array set portinfo [lindex $one_result 1]
+set portname $portinfo(name)
+puts $portname
+
 if {[info exists portinfo(porturl)]} {
-    if {[catch {set mport [mportopen $portinfo(porturl) "" ""]}]} {
+    if {[catch {set mport [mportopen $portinfo(porturl) [list subport $portname]  ""]}]} {
         ui_warn "failed to open port: $portname"
     } else {
         array unset portinfo
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20150717/7e9b944d/attachment.html>