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

[cal at macports.org]

Revision: 117219
          https://trac.macports.org/changeset/117219
Author:   cal at macports.org
Date:     2014-02-19 11:50:52 -0800 (Wed, 19 Feb 2014)
Log Message:
-----------
port.tcl: fix problem in progress indicators

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

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2014-02-19 19:44:52 UTC (rev 117218)
+++ trunk/base/src/port/port.tcl	2014-02-19 19:50:52 UTC (rev 117219)
@@ -4893,7 +4893,7 @@
                         if {$total != 0} {
                             progressbar $now $total [expr {min($maxWidth, $env(COLUMNS) - $barPrefixLen)}] $barPrefix
                         } else {
-                            unprogressbar $now [expr {min($maxWidth, $env(COLUMNS) - $barPrefixLen)}] $barPrefix
+                            unprogressbar [expr {min($maxWidth, $env(COLUMNS) - $barPrefixLen)}] $barPrefix
                         }
                     }
                 }
@@ -4953,7 +4953,7 @@
                             set barSuffixLen [string length $barSuffix]
 
                             set barLen [expr {min($maxWidth, $env(COLUMNS) - $barPrefixLen - $barSuffixLen)}]
-                            unprogressbar $now $total $barLen $barPrefix $barSuffix
+                            unprogressbar $barLen $barPrefix $barSuffix
                         }
                     }
                 }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20140219/dc9d45d6/attachment.html>