<pre style='margin:0'>
Rainer Müller (raimue) pushed a commit to branch vcs-fetch
in repository macports-base.

</pre>
<p><a href="https://github.com/macports/macports-base/commit/adbd290ce0d4ec8ed0e43425fb0fa57f307be05f">https://github.com/macports/macports-base/commit/adbd290ce0d4ec8ed0e43425fb0fa57f307be05f</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit adbd290ce0d4ec8ed0e43425fb0fa57f307be05f
</span>Author: Rainer Müller <raimue@macports.org>
AuthorDate: Mon Apr 2 03:45:09 2018 +0200

<span style='display:block; white-space:pre;color:#404040;'>    fetch: Show progress for git clone in verbose mode
</span>---
 src/port1.0/portfetch.tcl | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/port1.0/portfetch.tcl b/src/port1.0/portfetch.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 131e283..a20bf0b 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/port1.0/portfetch.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/port1.0/portfetch.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -733,7 +733,7 @@ proc portfetch::mirrorable {args} {
</span> 
 # Perform a git fetch
 proc portfetch::gitfetch {args} {
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    global UI_PREFIX \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    global UI_PREFIX portverbose \
</span>            distpath workpath worksrcpath \
            git.url git.branch git.fetch_submodules git.file git.file_prefix git.cmd \
            name distname fetch.type
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -744,7 +744,10 @@ proc portfetch::gitfetch {args} {
</span>         return 0
     }
 
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    set options "--progress"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set options ""
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    if {$portverbose} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set options "--progress"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    }
</span>     if {${git.branch} eq ""} {
         # If we're just using HEAD, we can make a shallow repo. In other cases,
         # it might cause a failure for some repos if the requested sha1 is not
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -757,7 +760,7 @@ proc portfetch::gitfetch {args} {
</span> 
     ui_info "$UI_PREFIX Cloning ${fetch.type} repository"
     set exportpath [file join ${workpath} export]
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    set cmdstring "${git.cmd} clone -q $options ${git.url} ${exportpath} 2>&1"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set cmdstring "${git.cmd} clone $options ${git.url} ${exportpath} 2>&1"
</span>     if {[catch {system $cmdstring} result]} {
         return -code error [msgcat::mc "Git clone failed"]
     }
</pre><pre style='margin:0'>

</pre>