Ticket #44815: uninstall-debugging.patch

src/registry2.0/portuninstall.tcl

@@ -321 +321 @@
                         foreach depdt $dependents {
                             if {[lsearch -exact $uports $depdt] == -1} {
                                 set all_dependents_uninstalling 0
+                                ui_msg "not adding $dep to uninstall list, $depdt depends on it"
                                 break
                             }
                         }
@@ -328 +329 @@
                             lappend uports $dep
                             lappend portilist $dep@${iversion}_${irevision}${ivariants}
                             set uninstalling_this_dep 1
+                            ui_msg "adding $dep to uninstall list"
                         }
                     }
                 }