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

[raimue at macports.org]

Revision: 89218
          http://trac.macports.org/changeset/89218
Author:   raimue at macports.org
Date:     2012-01-21 05:40:36 -0800 (Sat, 21 Jan 2012)
Log Message:
-----------
port.tcl:
Make info --pretty the default if no other option was given to the info action.
Other global options could break this before (e.g. a global ports_source_only).

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

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2012-01-21 12:14:51 UTC (rev 89217)
+++ trunk/base/src/port/port.tcl	2012-01-21 13:40:36 UTC (rev 89218)
@@ -2023,7 +2023,7 @@
         set pretty_print 0
         
         # For human-readable summary, which is the default with no options
-        if {![array size options]} {
+        if {[llength [array get options ports_info_*]] == 0} {
             set pretty_print 1
         } elseif {[info exists options(ports_info_pretty)]} {
             set pretty_print 1
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20120121/6a2e183f/attachment.html>