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

</pre>
<p><a href="https://github.com/macports/mpbb/commit/387064c27c616757509ec8462b72cfe512b228ad">https://github.com/macports/mpbb/commit/387064c27c616757509ec8462b72cfe512b228ad</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 387064c27c616757509ec8462b72cfe512b228ad
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Tue Mar 20 14:34:52 2018 +1100

<span style='display:block; white-space:pre;color:#404040;'>    Output canonical-case port names
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    Fixes: https://trac.macports.org/ticket/56101
</span>---
 tools/sort-with-subports.tcl | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/tools/sort-with-subports.tcl b/tools/sort-with-subports.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 853ae67..9c5ffb7 100755
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/tools/sort-with-subports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/tools/sort-with-subports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -65,6 +65,7 @@ if {[catch {mportinit "" "" ""} result]} {
</span> }
 
 array set portdepinfo {}
<span style='display:block; white-space:pre;background:#e0ffe0;'>+array set canonicalnames {}
</span> set todo [list]
 if {[lindex $argv 0] eq "-"} {
     while {[gets stdin line] >= 0} {
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -116,6 +117,9 @@ while {$todo ne {}} {
</span>             }
         }
         set portdepinfo($p) $deplist
<span style='display:block; white-space:pre;background:#e0ffe0;'>+        if {[info exists outputports($p)]} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            set canonicalnames($p) $portinfo(name)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        }
</span>     }
     array unset portinfo
 }
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -129,6 +133,6 @@ foreach portname [lsort -dictionary [array names portdepinfo]] {
</span> 
 foreach portname $portlist {
     if {[info exists outputports($portname)]} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        puts $portname
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        puts $canonicalnames($portname)
</span>     }
 }
</pre><pre style='margin:0'>

</pre>