[129164] trunk/base/src/port1.0/portutil.tcl

[larryv at macports.org]

Revision: 129164
          https://trac.macports.org/changeset/129164
Author:   larryv at macports.org
Date:     2014-12-07 15:18:19 -0800 (Sun, 07 Dec 2014)
Log Message:
-----------
port1.0: Use "eq" and "ne" in "subport" proc

Modified Paths:
--------------
    trunk/base/src/port1.0/portutil.tcl

Modified: trunk/base/src/port1.0/portutil.tcl
===================================================================
--- trunk/base/src/port1.0/portutil.tcl	2014-12-07 23:12:18 UTC (rev 129163)
+++ trunk/base/src/port1.0/portutil.tcl	2014-12-07 23:18:19 UTC (rev 129164)
@@ -812,7 +812,7 @@
 # subport, and also adds it to the list of subports that are defined.
 proc subport {subname body} {
     global subport name PortInfo
-    if {$subport == $name && $subname != $name && 
+    if {$subport eq $name && $subname ne $name && 
         (![info exists PortInfo(subports)] || [lsearch -exact $PortInfo(subports) $subname] == -1)} {
         lappend PortInfo(subports) $subname
     }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20141207/705c5dd5/attachment.html>