<pre style='margin:0'>
Ryan Schmidt (ryandesign) pushed a commit to branch master
in repository mpbb.

</pre>
<p><a href="https://github.com/macports/mpbb/commit/7873aff65c498c65eea51c92b305dbd09f9030ff">https://github.com/macports/mpbb/commit/7873aff65c498c65eea51c92b305dbd09f9030ff</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 7873aff65c498c65eea51c92b305dbd09f9030ff
</span>Author: Ryan Schmidt <git@ryandesign.com>
AuthorDate: Sat Jun 1 15:38:35 2019 -0500

<span style='display:block; white-space:pre;color:#404040;'>    Rename "old" variable to "uninstall"
</span>---
 tools/uninstall-old-ports.tcl | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/tools/uninstall-old-ports.tcl b/tools/uninstall-old-ports.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index fbe8033..7dc0f21 100755
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/tools/uninstall-old-ports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/tools/uninstall-old-ports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -40,8 +40,8 @@ if {$showVersion} {
</span> }
 
 foreach port [registry::entry imaged] {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    # Set to yes if a port is not current
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    set old no
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # Set to yes if a port should be uninstalled
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set uninstall no
</span> 
     set installed_name [$port name]
     set installed_version [$port version]
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -50,21 +50,20 @@ foreach port [registry::entry imaged] {
</span> 
     set portindex_match [mportlookup $installed_name]
     if {[llength $portindex_match] < 2} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        # Not found in index, classify as old
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        # Not found in index
</span>         ui_msg "Removing ${installed_name} @${installed_version}_${installed_revision}${installed_variants} because it is no longer in the PortIndex"
<span style='display:block; white-space:pre;background:#ffe0e0;'>-        set old yes
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set uninstall yes
</span>     } else {
         array unset portinfo
         array set portinfo [lindex $portindex_match 1]
 
         if {$portinfo(version) ne $installed_version || $portinfo(revision) != $installed_revision} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            # Port is not current because the version in the index is
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-            # different than the installed one
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            # The version in the index is different than the installed one
</span>             ui_msg "Removing ${installed_name} @${installed_version}_${installed_revision}${installed_variants} because there is a newer version in the PortIndex"
<span style='display:block; white-space:pre;background:#ffe0e0;'>-            set old yes
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            set uninstall yes
</span>         }
     }
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    if {$old} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    if {$uninstall} {
</span>         registry_uninstall::uninstall $installed_name $installed_version $installed_revision $installed_variants [list ports_force 1]
     }
 }
</pre><pre style='margin:0'>

</pre>