<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/b982a71f14063806fe3761602d6dbe2f0e5c7754">https://github.com/macports/macports-base/commit/b982a71f14063806fe3761602d6dbe2f0e5c7754</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit b982a71f14063806fe3761602d6dbe2f0e5c7754
</span>Author: Rainer Müller <raimue@macports.org>
AuthorDate: Mon Mar 12 18:50:46 2018 +0100

<span style='display:block; white-space:pre;color:#404040;'>    fetch: Move compression to helper proc
</span>---
 src/port1.0/portfetch.tcl | 22 ++++++++++++++--------
 1 file changed, 14 insertions(+), 8 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 3cb287d..98f3058 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;'>@@ -311,6 +311,18 @@ proc portfetch::checkfiles {urls} {
</span>     checkdistfiles fetch_urls
 }
 
<span style='display:block; white-space:pre;background:#e0ffe0;'>+# Compress a file and remove the original
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+proc compressfile {file} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set xz [findBinary xz ${portutil::autoconf::xz_path}]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set cmdstring "$xz ${file}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    if {[catch {system $cmdstring} result]} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        delete "${file}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        delete "${file}.xz"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        return -code error "Compression failed"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    return "${file}.xz"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span> # Perform a bzr fetch
 proc portfetch::bzrfetch {args} {
     global env
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -573,14 +585,8 @@ proc portfetch::gitfetch {args} {
</span>     }
 
     # compress resulting tarball
<span style='display:block; white-space:pre;background:#ffe0e0;'>-    set xz [findBinary xz ${portutil::autoconf::xz_path}]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    set cmdstring "$xz ${tardst}"
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    if {[catch {system $cmdstring} result]} {
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        delete "${tardst}"
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        delete "${tardst}.xz"
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-        return -code error [msgcat::mc "Git submodule archive creation failed"]
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    }
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>-    file rename -force "${tardst}.xz" "${generatedfile}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set compressed [compressfile ${tardst}]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    file rename -force ${compressed} ${generatedfile}
</span> 
     ui_debug "Created tarball for fetch.type ${fetch.type} at ${generatedfile}"
 
</pre><pre style='margin:0'>

</pre>