<pre style='margin:0'>
Joshua Root (jmroot) pushed a commit to branch master
in repository macports-infrastructure.

</pre>
<p><a href="https://github.com/macports/macports-infrastructure/commit/6426ac6e1e72d19ec86d7420b773e4eae121a973">https://github.com/macports/macports-infrastructure/commit/6426ac6e1e72d19ec86d7420b773e4eae121a973</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 6426ac6e1e72d19ec86d7420b773e4eae121a973
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Fri Nov 12 00:50:53 2021 +1100

<span style='display:block; white-space:pre;color:#404040;'>    distributable_lib: skip already-seen deps better
</span>---
 jobs/distributable_lib.tcl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/jobs/distributable_lib.tcl b/jobs/distributable_lib.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 3e32e56..fc9eb9d 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/jobs/distributable_lib.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/jobs/distributable_lib.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -234,10 +234,12 @@ proc check_licenses {portName variantInfo} {
</span> 
     # start with deps of top-level port
     set portList [lindex $top_info 0]
<span style='display:block; white-space:pre;background:#e0ffe0;'>+    foreach p $portList {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set portSeen($p) 1
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    }
</span>     while {[llength $portList] > 0} {
         set aPort [lindex $portList 0]
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        # mark as seen and remove from the list
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        set portSeen($aPort) 1
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        # remove it from the list
</span>         set portList [lreplace $portList 0 0]
         if {[info exists noconflict_ports($aPort)]} {
             continue
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -326,6 +328,7 @@ proc check_licenses {portName variantInfo} {
</span>         foreach possiblyNewPort [lindex $aPortInfo 0] {
             if {![info exists portSeen($possiblyNewPort)] && ![info exists aPort_noconflict_ports($possiblyNewPort)]} {
                 lappend portList $possiblyNewPort
<span style='display:block; white-space:pre;background:#e0ffe0;'>+                set portSeen($possiblyNewPort) 1
</span>             }
         }
     }
</pre><pre style='margin:0'>

</pre>