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

<span style='display:block; white-space:pre;color:#404040;'>    portutil: 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/port1.0/portutil.tcl | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/port1.0/portutil.tcl b/src/port1.0/portutil.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 4ab8369e..26e0add5 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/port1.0/portutil.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/port1.0/portutil.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -545,7 +545,7 @@ proc handle_option_string {option action args} {
</span>         set {
             set args [join $args]
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            set fulllist {}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            set fulllist [list]
</span>             # args is a list of strings/list
             foreach arg $args {
                 # Strip empty lines at beginning
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -1194,7 +1194,7 @@ proc copy {args} {
</span> # move
 # Wrapper for file rename that handles case-only renames
 proc move {args} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    set options {}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set options [list]
</span>     while {[string match "-*" [lindex $args 0]]} {
         set arg [string range [lindex $args 0] 1 end]
         set args [lreplace $args 0 0]
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -1473,7 +1473,7 @@ proc target_run {ditem} {
</span>                     }
 
                     # Recursively collect all dependencies from registry for tracing
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                    set deplist {}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                    set deplist [list]
</span>                     foreach depspec $depends {
                         # Resolve dependencies to actual ports
                         set name [_get_dep_port $depspec]
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -2777,8 +2777,8 @@ proc extract_archive_metadata {archive_location archive_type metadata_type} {
</span>         file delete -force $tempdir
     }
     if {$metadata_type eq "contents"} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        set contents {}
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        set binary_info {}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set contents [list]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set binary_info [list]
</span>         set ignore 0
         set sep [file separator]
         foreach line [split $raw_contents \n] {
</pre><pre style='margin:0'>

</pre>