<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/49a98ea4e37e66e32789bfbe23339c82e40410c5">https://github.com/macports/macports-base/commit/49a98ea4e37e66e32789bfbe23339c82e40410c5</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 49a98ea4e37e66e32789bfbe23339c82e40410c5
</span>Author: Clemens Lang <cal@macports.org>
AuthorDate: Mon Dec 18 23:13:46 2023 +0100

<span style='display:block; white-space:pre;color:#404040;'>    macports/restore: Use ===> as ui_prefix for restore operations
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    The relevant info gets lost in a sea of about a thousand ---> lines, so
</span><span style='display:block; white-space:pre;color:#404040;'>    let's use ===> for operations performed by the restore operation to draw
</span><span style='display:block; white-space:pre;color:#404040;'>    attention to the lines that contain progress information.
</span>---
 src/macports1.0/restore.tcl | 18 +++++++++++-------
 1 file changed, 11 insertions(+), 7 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/macports1.0/restore.tcl b/src/macports1.0/restore.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 34e399341..98b053a68 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/macports1.0/restore.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/macports1.0/restore.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -41,6 +41,8 @@ package require struct::graph::op 0.11
</span> package require lambda 1
 
 namespace eval restore {
<span style='display:block; white-space:pre;background:#e0ffe0;'>+    variable ui_prefix
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span>     proc main {opts} {
         # The main function. If the action is provided a snapshot id, then it deactivates
         # all the current ports and restores the specified snapshot.
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -59,6 +61,8 @@ namespace eval restore {
</span> 
         array set options $opts
 
<span style='display:block; white-space:pre;background:#e0ffe0;'>+        set restore::ui_prefix [string map {--- ===} $macports::ui_prefix]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span>         if {[migrate::needs_migration]} {
             ui_error "You need to run 'sudo port migrate' before running restore"
             return 1
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -87,10 +91,10 @@ namespace eval restore {
</span>             set snapshot [lindex $snapshots $retstring]
         }
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        ui_msg "$macports::ui_prefix Deactivating all installed ports"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        ui_msg "$restore::ui_prefix Deactivating all installed ports"
</span>         deactivate_all
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        ui_msg "$macports::ui_prefix Restoring snapshot '[$snapshot note]' created at [$snapshot created_at]"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        ui_msg "$restore::ui_prefix Restoring snapshot '[$snapshot note]' created at [$snapshot created_at]"
</span>         set snapshot_portlist [$snapshot ports]
         array set failed [restore_state [$snapshot ports]]
 
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -235,9 +239,9 @@ namespace eval restore {
</span>         }
 
         if {$fancy_output} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            ui_msg "$macports::ui_prefix Computing dependency order"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            ui_msg "$restore::ui_prefix Computing dependency order"
</span>         } else {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            ui_msg "$macports::ui_prefix Computing dependency order. This will take a while, please be patient"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            ui_msg "$restore::ui_prefix Computing dependency order. This will take a while, please be patient"
</span>             flush stdout
         }
         $progress start
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -391,7 +395,7 @@ namespace eval restore {
</span> 
         $progress finish
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        ui_msg "$macports::ui_prefix Sorting dependency tree"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        ui_msg "$restore::ui_prefix Sorting dependency tree"
</span> 
         # Compute a list of stronly connected components using Tarjan's
         # algorithm. The result should be a list of one-element sets (unless
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -450,9 +454,9 @@ namespace eval restore {
</span>             lassign $port name requested active variants
 
             if {$variants ne ""} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                ui_msg "$macports::ui_prefix $index/$length Restoring $name $variants from snapshot"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                ui_msg "$restore::ui_prefix Restoring port $index of $length: $name $variants"
</span>             } else {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-                ui_msg "$macports::ui_prefix $index/$length Restoring $name from snapshot"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                ui_msg "$restore::ui_prefix Restoring port $index of $length: $name"
</span>             }
 
             if {[info exists failed($name)]} {
</pre><pre style='margin:0'>

</pre>