[44054] users/perry/base-select/src/macports1.0/macports.tcl

[perry at macports.org]

Revision: 44054
          http://trac.macports.org/changeset/44054
Author:   perry at macports.org
Date:     2008-12-19 22:59:25 -0800 (Fri, 19 Dec 2008)
Log Message:
-----------
macports1.0/macports.tcl - Fixed bug in --list.

Modified Paths:
--------------
    users/perry/base-select/src/macports1.0/macports.tcl

Modified: users/perry/base-select/src/macports1.0/macports.tcl
===================================================================
--- users/perry/base-select/src/macports1.0/macports.tcl	2008-12-20 06:45:04 UTC (rev 44053)
+++ users/perry/base-select/src/macports1.0/macports.tcl	2008-12-20 06:59:25 UTC (rev 44054)
@@ -2289,7 +2289,8 @@
             # Return the list of versions, excluding base.
             set lversions {}
             foreach v $versions {
-                if {$versions ne "base"} {
+                set v [file tail $v]
+                if {$v ne "base"} {
                     lappend lversions [file tail $v]
                 }
             }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20081219/c838d6d4/attachment.html>