Revision: 68464 http://trac.macports.org/changeset/68464 Author: jmr@macports.org Date: 2010-06-03 19:02:28 -0700 (Thu, 03 Jun 2010) Log Message: ----------- merge r68463 from trunk: fix error reporting when the given port is not installed in action_setrequested (#25122) Revision Links: -------------- http://trac.macports.org/changeset/68463 Modified Paths: -------------- branches/release_1_9/base/src/port/port.tcl Modified: branches/release_1_9/base/src/port/port.tcl =================================================================== --- branches/release_1_9/base/src/port/port.tcl 2010-06-04 01:59:12 UTC (rev 68463) +++ branches/release_1_9/base/src/port/port.tcl 2010-06-04 02:02:28 UTC (rev 68464) @@ -2414,7 +2414,7 @@ set val [string equal $action setrequested] foreachport $portlist { set composite_version [composite_version $portversion [array get variations]] - if {![catch {set ilist [registry::installed $portname $composite_version]}]} { + if {![catch {set ilist [registry::installed $portname $composite_version]} result]} { ui_info "Setting requested flag for $portname to $val" foreach i $ilist { set regref [registry::entry open $portname [lindex $i 1] [lindex $i 2] [lindex $i 3] [lindex $i 5]]