<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>