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

[perry at macports.org]

Revision: 44058
          http://trac.macports.org/changeset/44058
Author:   perry at macports.org
Date:     2008-12-19 23:39:25 -0800 (Fri, 19 Dec 2008)
Log Message:
-----------
port/port.tcl - default_variants in action_variants are now shown by a [+].

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

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2008-12-20 07:24:25 UTC (rev 44057)
+++ trunk/base/src/port/port.tcl	2008-12-20 07:39:25 UTC (rev 44058)
@@ -2136,14 +2136,16 @@
                 array unset vinfo
                 array set vinfo $variants($vname)
 
-                puts -nonewline "\t$vname"
+                if { [ info exists vinfo(is_default) ] \
+                     && $vinfo(is_default) == "+" } {
+                    set mod "\[+] "
+                } else {
+                    set mod {}
+                }
+                puts -nonewline "\t$mod$vname"
                 if { [ info exists vinfo(description) ] } {
                     puts -nonewline ": [ string trim $vinfo(description) ]"
                 }
-                if { [ info exists vinfo(is_default) ] \
-                     && $vinfo(is_default) == "+" } {
-                    puts -nonewline "\n\t  * is a default variant"
-                }
                 if { [ info exists vinfo(conflicts) ] \
                     && $vinfo(conflicts) != "" } {
                     puts -nonewline "\n\t  * conflicts with [ string trim $vinfo(conflicts) ]"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20081219/7c92e64a/attachment.html>