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

</pre>
<p><a href="https://github.com/macports/macports-base/commit/2b8ddb26cfec597cfff76f9a00efad6e43eb6aea">https://github.com/macports/macports-base/commit/2b8ddb26cfec597cfff76f9a00efad6e43eb6aea</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 2b8ddb26cfec597cfff76f9a00efad6e43eb6aea
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Sun Feb 11 05:15:05 2024 +1100

<span style='display:block; white-space:pre;color:#404040;'>    Use dict in -D handling
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    Also clean up variables created in global scope when done with them.
</span>---
 src/port/port.tcl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/port/port.tcl b/src/port/port.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index bfb4734e4..e09db069a 100755
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/port/port.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/port/port.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -5401,14 +5401,17 @@ if {[info exists global_options(ports_dir)]} {
</span>             ui_error "port -D failed to look up $portname: no such port"
             exit 1
         }
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        array set portinfo [lindex $result 1]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        set dir [macports::getportdir $portinfo(porturl)]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        unset portname
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set portinfo [lindex $result 1]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set dir [macports::getportdir [dict get $portinfo porturl]]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        unset portinfo
</span>     }
     if {[catch {cd $dir} result]} {
         ui_debug "cd $dir: $::errorCode"
         ui_error "port -D could not change directory to $dir: [lindex $::errorCode 2]"
         exit 1
     }
<span style='display:block; white-space:pre;background:#e0ffe0;'>+    unset dir
</span> }
 
 # Set up some global state for our code
</pre><pre style='margin:0'>

</pre>