<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/39863e9980106f00bfe4cc2ecff88ef9ece5f7a1">https://github.com/macports/macports-base/commit/39863e9980106f00bfe4cc2ecff88ef9ece5f7a1</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 39863e9980106f00bfe4cc2ecff88ef9ece5f7a1
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Tue Oct 20 10:50:14 2020 +1100

<span style='display:block; white-space:pre;color:#404040;'>    registry_util: init list vars with [list]
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    This ensures they are pure lists.
</span>---
 src/registry2.0/registry_util.tcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/registry2.0/registry_util.tcl b/src/registry2.0/registry_util.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index c9a35b63..5aca79c7 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/registry2.0/registry_util.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/registry2.0/registry_util.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -66,7 +66,7 @@ proc check_dependents {port force {action "uninstall/deactivate"}} {
</span>         # Check if any installed ports depend on this one
         set deplist [$port dependents]
         if {$action eq "deactivate"} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            set active_deplist {}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            set active_deplist [list]
</span>             # Check if any active ports depend on this one
             foreach p $deplist {
                 if {[$p state] eq "installed"} {
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -79,7 +79,7 @@ proc check_dependents {port force {action "uninstall/deactivate"}} {
</span>             ## User Interaction Question
             # ask if user wants to uninstall a port and thereby break its dependents
             if {[info exists macports::ui_options(questions_yesno)] && ![string is true -strict $force]} { 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                set portulist {}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                set portulist [list]
</span>                 foreach depport $deplist {
                     lappend portulist [$depport name]@[$depport version]_[$depport revision]
                 }
</pre><pre style='margin:0'>

</pre>