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

[raimue at macports.org]

Revision: 102389
          https://trac.macports.org/changeset/102389
Author:   raimue at macports.org
Date:     2013-02-01 09:09:07 -0800 (Fri, 01 Feb 2013)
Log Message:
-----------
port/port.tcl:
Omit label in quiet mode for 'port version' and 'port platform'

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

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2013-02-01 17:08:01 UTC (rev 102388)
+++ trunk/base/src/port/port.tcl	2013-02-01 17:09:07 UTC (rev 102389)
@@ -2673,13 +2673,19 @@
 
 
 proc action_version { action portlist opts } {
-    puts "Version: [macports::version]"
+    if ![macports::ui_isset ports_quiet] {
+        puts -nonewline "Version: "
+    }
+    puts [macports::version]
     return 0
 }
 
 
 proc action_platform { action portlist opts } {
-    puts "Platform: ${macports::os_platform} ${macports::os_major} ${macports::os_arch}"
+    if ![macports::ui_isset ports_quiet] {
+        puts -nonewline "Platform: "
+    }
+    puts "${macports::os_platform} ${macports::os_major} ${macports::os_arch}"
     return 0
 }
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130201/9c1bcbcd/attachment.html>