[68463] trunk/base/src/port/port.tcl

jmr at macports.org jmr at macports.org
Thu Jun 3 18:59:15 PDT 2010


Revision: 68463
          http://trac.macports.org/changeset/68463
Author:   jmr at macports.org
Date:     2010-06-03 18:59:12 -0700 (Thu, 03 Jun 2010)
Log Message:
-----------
fix error reporting when the given port is not installed in action_setrequested (#25122)

Modified Paths:
--------------
    trunk/base/src/port/port.tcl

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2010-06-04 00:47:58 UTC (rev 68462)
+++ trunk/base/src/port/port.tcl	2010-06-04 01:59:12 UTC (rev 68463)
@@ -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]]
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100603/88e2fe19/attachment.html>


More information about the macports-changes mailing list