<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/54413fe125ed2c7583e386b4dca2fa88d71be7d0">https://github.com/macports/mpbb/commit/54413fe125ed2c7583e386b4dca2fa88d71be7d0</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 54413fe  dependencies.tcl: clean work dirs in install_dep_source too
</span>54413fe is described below

<span style='display:block; white-space:pre;color:#808000;'>commit 54413fe125ed2c7583e386b4dca2fa88d71be7d0
</span>Author: Joshua Root <jmr@macports.org>
AuthorDate: Sat Jan 20 06:02:30 2024 +1100

<span style='display:block; white-space:pre;color:#404040;'>    dependencies.tcl: clean work dirs in install_dep_source too
</span>---
 tools/dependencies.tcl | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/tools/dependencies.tcl b/tools/dependencies.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index d8318c1..efa6816 100755
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/tools/dependencies.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/tools/dependencies.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -418,6 +418,15 @@ if {$failcache_dir ne ""} {
</span>     set start_time [clock seconds]
 }
 
<span style='display:block; white-space:pre;background:#e0ffe0;'>+# clean up any work directories left over from earlier
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# (avoids possible errors with different variants in the statefile)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+proc clean_workdirs {} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set build_dir [file join $macports::portdbpath build]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    foreach dir [glob -nocomplain -directory $build_dir *] {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        file delete -force -- $dir
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span> # Returns 0 if dep is installed, 1 if not
 proc install_dep_archive {ditem} {
     array set depinfo $::mportinfo_array($ditem)
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -430,12 +439,7 @@ proc install_dep_archive {ditem} {
</span>         puts $::log_status_dependencies {[OK]}
         return 0
     }
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    # clean up any work directories left over from earlier
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    # (avoids possible errors with different variants in the statefile)
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    set build_dir [file join $macports::portdbpath build]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    foreach dir [glob -nocomplain -directory $build_dir *] {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        file delete -force -- $dir
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    clean_workdirs
</span>     set fail 0
     set workername [ditem_key $ditem workername]
 
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -495,6 +499,7 @@ proc install_dep_source {portinfo_list} {
</span>     set macports::channels(debug) {}
     set macports::channels(info) {}
     close_open_mports
<span style='display:block; white-space:pre;background:#e0ffe0;'>+    clean_workdirs
</span>     array unset ::mportinfo_array
     set ditem [lindex [open_port $depinfo(name)] 0]
     # Ensure archivefetch is not attempted at all
</pre><pre style='margin:0'>

</pre>