[47373] trunk/base/src/macports1.0/macports.tcl

[jmr at macports.org]

Revision: 47373
          http://trac.macports.org/changeset/47373
Author:   jmr at macports.org
Date:     2009-02-27 05:24:27 -0800 (Fri, 27 Feb 2009)
Log Message:
-----------
Notify the user that dependencies are being computed, and print a progress indicator in verbose mode.

Modified Paths:
--------------
    trunk/base/src/macports1.0/macports.tcl

Modified: trunk/base/src/macports1.0/macports.tcl
===================================================================
--- trunk/base/src/macports1.0/macports.tcl	2009-02-27 11:52:16 UTC (rev 47372)
+++ trunk/base/src/macports1.0/macports.tcl	2009-02-27 13:24:27 UTC (rev 47373)
@@ -1390,9 +1390,13 @@
         || $target == "rpm" || $target == "dpkg" 
         || $target == "srpm"|| $target == "portpkg" } {
 
+        if {![macports::ui_isset ports_quiet]} {
+            puts -nonewline "---> Computing dependencies for [_mportkey $mport name]"
+        }
         if {[mportdepends $mport $target] != 0} {
             return 1
         }
+        ui_msg ""
         
         # Select out the dependents along the critical path,
         # but exclude this mport, we might not be installing it.
@@ -1974,6 +1978,12 @@
     } else {
         upvar accDeps accDeps
     }
+    
+    # progress indicator
+    if {$macports::portverbose} {
+        puts -nonewline "."
+        flush stdout
+    }
         
     # Determine deptypes to look for based on target
     switch $target {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090227/ff816994/attachment.html>