Pass $dbh down through the stack, for better lifetime

[ypp-sc-tools.web-live.git] / yarrg / web / source.tar.gz

diff --git a/yarrg/web/source.tar.gz b/yarrg/web/source.tar.gz
index 7a0525a564880bd035c4db55d78a5cb8cbb50d34..13cd22f4d9040724a67d18839794b649493f2911 100755 (executable)
--- a/yarrg/web/source.tar.gz
+++ b/yarrg/web/source.tar.gz
@@ -33,7 +33,9 @@
  the YARRG website's source code.
 
 
-</%doc><%perl>
+</%doc><%flags>
+inherit => undef
+</%flags><%perl>
 use IO::Pipe;
 use CommodsWeb;
 
@@ -51,7 +53,10 @@ if (!$pid) {
                 git-ls-files -z;
                 git-ls-files -z --others --exclude-from=.gitignore;
                 if test -d .git; then find .git -print0; fi
-               ) | cpio -Hustar -o --quiet -0 -R 1000:1000 | gzip
+               ) | (
+                cpio -Hustar -o --quiet -0 -R 1000:1000 || \
+                cpio -Hustar -o --quiet -0
+               ) | gzip
        ';
        die $!;
 }