<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/3ebc74a13bc795dde303b3964d44bdfa0fb807ef">https://github.com/macports/mpbb/commit/3ebc74a13bc795dde303b3964d44bdfa0fb807ef</a></p>
<pre style="white-space: pre; background: #F8F8F8">The following commit(s) were added to refs/heads/master by this push:
<span style='display:block; white-space:pre;color:#404040;'>     new 3ebc74a  gather-archives.tcl: normalise supplied paths
</span>3ebc74a is described below

<span style='display:block; white-space:pre;color:#808000;'>commit 3ebc74a13bc795dde303b3964d44bdfa0fb807ef
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Thu May 12 02:58:05 2022 +1000

<span style='display:block; white-space:pre;color:#404040;'>    gather-archives.tcl: normalise supplied paths
</span>---
 tools/gather-archives.tcl | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/tools/gather-archives.tcl b/tools/gather-archives.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index e774944..3dda4da 100755
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/tools/gather-archives.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/tools/gather-archives.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -4,11 +4,6 @@ package require macports
</span> package require registry2
 package require fetch_common
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-if {[catch {mportinit "" "" ""} result]} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-   puts stderr "$errorInfo"
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-   error "Failed to initialize ports system: $result"
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-}
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-
</span> set archive_site_private https://packages-private.macports.org
 set archive_site_public https://packages.macports.org
 set jobs_dir ""
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -25,15 +20,15 @@ while {[string range [lindex $::argv 0] 0 1] eq "--"} {
</span>             set ::argv [lreplace $::argv 0 0]
         }
         --jobs_dir {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            set jobs_dir [lindex $::argv 1]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            set jobs_dir [file normalize [lindex $::argv 1]]
</span>             set ::argv [lreplace $::argv 0 0]
         }
         --license_db_dir {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            set license_db_dir [lindex $::argv 1]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            set license_db_dir [file normalize [lindex $::argv 1]]
</span>             set ::argv [lreplace $::argv 0 0]
         }
         --staging_dir {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            set staging_dir [lindex $::argv 1]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            set staging_dir [file normalize [lindex $::argv 1]]
</span>             set ::argv [lreplace $::argv 0 0]
         }
         default {
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -53,6 +48,11 @@ if {[llength $::argv] == 0} {
</span>     error "must specify an input file"
 }
 
<span style='display:block; white-space:pre;background:#e0ffe0;'>+if {[catch {mportinit "" "" ""} result]} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+   puts stderr "$errorInfo"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+   error "Failed to initialize ports system: $result"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span> source ${jobs_dir}/distributable_lib.tcl
 if {$license_db_dir ne ""} {
     init_license_db $license_db_dir
</pre><pre style='margin:0'>

</pre>