[82292] branches/release_2_0/base/src

[afb at macports.org]

Revision: 82292
          http://trac.macports.org/changeset/82292
Author:   afb at macports.org
Date:     2011-08-12 02:05:23 -0700 (Fri, 12 Aug 2011)
Log Message:
-----------
add a vercmp alias, for easier future upgrading

Modified Paths:
--------------
    branches/release_2_0/base/src/pextlib1.0/Pextlib.c
    branches/release_2_0/base/src/port/port.tcl

Modified: branches/release_2_0/base/src/pextlib1.0/Pextlib.c
===================================================================
--- branches/release_2_0/base/src/pextlib1.0/Pextlib.c	2011-08-12 09:00:56 UTC (rev 82291)
+++ branches/release_2_0/base/src/pextlib1.0/Pextlib.c	2011-08-12 09:05:23 UTC (rev 82292)
@@ -485,6 +485,7 @@
 	Tcl_CreateObjCommand(interp, "fs-traverse", FsTraverseCmd, NULL, NULL);
 	Tcl_CreateObjCommand(interp, "filemap", FilemapCmd, NULL, NULL);
 	Tcl_CreateObjCommand(interp, "rpm-vercomp", RPMVercompCmd, NULL, NULL);
+	Tcl_CreateObjCommand(interp, "vercmp", RPMVercompCmd, NULL, NULL);
 	Tcl_CreateObjCommand(interp, "rmd160", RMD160Cmd, NULL, NULL);
 	Tcl_CreateObjCommand(interp, "sha256", SHA256Cmd, NULL, NULL);
 	Tcl_CreateObjCommand(interp, "base32encode", Base32EncodeCmd, NULL, NULL);

Modified: branches/release_2_0/base/src/port/port.tcl
===================================================================
--- branches/release_2_0/base/src/port/port.tcl	2011-08-12 09:00:56 UTC (rev 82291)
+++ branches/release_2_0/base/src/port/port.tcl	2011-08-12 09:05:23 UTC (rev 82292)
@@ -480,9 +480,9 @@
     }
     set avr_ [split $a_(version) "_"]
     set bvr_ [split $b_(version) "_"]
-    set vercmp [rpm-vercomp [lindex $avr_ 0] [lindex $bvr_ 0]]
-    if {$vercmp != 0} {
-        return $vercmp
+    set versioncmp [rpm-vercomp [lindex $avr_ 0] [lindex $bvr_ 0]]
+    if {$versioncmp != 0} {
+        return $versioncmp
     }
     set ar_ [lindex $avr_ 1]
     set br_ [lindex $bvr_ 1]
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20110812/80cc5217/attachment.html>