Modified: trunk/base/src/macports1.0/macports_dlist.tcl (119650 => 119651)

--- trunk/base/src/macports1.0/macports_dlist.tcl	2014-05-02 23:03:21 UTC (rev 119650)
+++ trunk/base/src/macports1.0/macports_dlist.tcl	2014-05-03 00:22:36 UTC (rev 119651)
@@ -315,7 +315,7 @@
 		} else {
 			# $handler should return a unix status code, 0 for success.
 			# statusdict notation is 1 for success
-			if {[catch {$handler $ditem} result]} {
+			if {[catch {{*}$handler $ditem} result]} {
 				puts $result
 				return $dlist
 			}