summaryrefslogtreecommitdiff
path: root/Pristine
diff options
context:
space:
mode:
authorJoey Hess <joey@kitenet.net>2010-11-11 21:05:45 -0400
committerJoey Hess <joey@kitenet.net>2010-11-11 21:05:45 -0400
commit5eedd9ba6116b5988ff18aed41921e5cc4101877 (patch)
treec8d367aebe64277626c6851920859d52c5bf79fa /Pristine
parent43993d602e0287aaa7ae1e932ca3b76499016c08 (diff)
downloadpristine-tar-5eedd9ba6116b5988ff18aed41921e5cc4101877.tar.gz
pristine-tar-5eedd9ba6116b5988ff18aed41921e5cc4101877.tar.bz2
pristine-tar-5eedd9ba6116b5988ff18aed41921e5cc4101877.zip
Add workaround for Debian's tar changing its output for tarballs containing filenames exactly 100 bytes long. Closes: #602907 (Needs a tar with #603231 fixed in order to work.)
Diffstat (limited to 'Pristine')
-rw-r--r--Pristine/Tar.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/Pristine/Tar.pm b/Pristine/Tar.pm
index a6a8446..68e202f 100644
--- a/Pristine/Tar.pm
+++ b/Pristine/Tar.pm
@@ -34,12 +34,16 @@ sub vprint {
}
sub doit {
- vprint(@_);
- if (system(@_) != 0) {
+ if (maybe_doit(@_) != 0) {
error "command failed: @_";
}
}
+sub try_doit {
+ vprint(@_);
+ return system(@_)
+}
+
sub doit_redir {
no warnings 'once';
my ($in, $out, @args) = @_;