Revision
68288
Author
jmr@macports.org
Date
2010-05-30 22:11:31 -0700 (Sun, 30 May 2010)

Log Message

only print reason message when epochs differ in action_outdated if the comparison result would otherwise be unexpected

Modified Paths

Diff

Modified: trunk/base/src/port/port.tcl (68287 => 68288)


--- trunk/base/src/port/port.tcl	2010-05-31 04:47:52 UTC (rev 68287)
+++ trunk/base/src/port/port.tcl	2010-05-31 05:11:31 UTC (rev 68288)
@@ -2988,7 +2988,9 @@
             }
             set reason ""
             if {$epoch_comp_result != 0} {
-                set reason { (epoch $installed_epoch $relation $latest_epoch)}
+                if {($comp_result >= 0 && $epoch_comp_result < 0) || ($comp_result <= 0 && $epoch_comp_result > 0)} {
+                    set reason { (epoch $installed_epoch $relation $latest_epoch)}
+                }
                 set comp_result $epoch_comp_result
             } elseif {$comp_result == 0} {
                 set regref [registry::open_entry $portname $installed_version $installed_revision [lindex $i 3] $installed_epoch]