[138001] trunk/base/src/registry2.0/portuninstall.tcl

[jmr at macports.org]

Revision: 138001
          https://trac.macports.org/changeset/138001
Author:   jmr at macports.org
Date:     2015-06-24 23:58:49 -0700 (Wed, 24 Jun 2015)
Log Message:
-----------
Only exclude new deps from the list in recursive uninstall if they are already in the remainder of the list to be processed, not if they have been previously processed. Deps need to be processed again every time one of their dependents is added for removal. Fixes #44815.

Modified Paths:
--------------
    trunk/base/src/registry2.0/portuninstall.tcl

Modified: trunk/base/src/registry2.0/portuninstall.tcl
===================================================================
--- trunk/base/src/registry2.0/portuninstall.tcl	2015-06-25 01:35:54 UTC (rev 138000)
+++ trunk/base/src/registry2.0/portuninstall.tcl	2015-06-25 06:58:49 UTC (rev 138001)
@@ -337,7 +337,7 @@
                 foreach depref $deprefs {
                     set depdeps [registry_uninstall::generate_deplist $depref $optionslist]
                     foreach d $depdeps {
-                        if {[lsearch -exact $alldeps $d] == -1} {
+                        if {[lsearch -exact [lrange $alldeps $j+1 end] $d] == -1} {
                             lappend alldeps $d 
                         }
                     }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20150624/8639151a/attachment.html>