Revision
119654
Author
jmr@macports.org
Date
2014-05-02 19:03:03 -0700 (Fri, 02 May 2014)

Log Message

fix incorrect change to logic in dlist_eval (testcond can return -1)

Modified Paths

Diff

Modified: trunk/base/src/macports1.0/macports_dlist.tcl (119653 => 119654)


--- trunk/base/src/macports1.0/macports_dlist.tcl	2014-05-03 01:58:45 UTC (rev 119653)
+++ trunk/base/src/macports1.0/macports_dlist.tcl	2014-05-03 02:03:03 UTC (rev 119654)
@@ -294,7 +294,7 @@
 	# can evaluate to true.
 	if {$testcond ne ""} {
 		foreach ditem $dlist {
-			if {[expr [$testcond $ditem]]} {
+			if {[$testcond $ditem] == 1} {
 				foreach token [ditem_key $ditem provides] {
 					set statusdict($token) 1
 				}