diff options
author | Joey Hess <joey@kitenet.net> | 2010-11-11 21:05:45 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-11-11 21:05:45 -0400 |
commit | 5eedd9ba6116b5988ff18aed41921e5cc4101877 (patch) | |
tree | c8d367aebe64277626c6851920859d52c5bf79fa /Pristine | |
parent | 43993d602e0287aaa7ae1e932ca3b76499016c08 (diff) | |
download | pristine-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.pm | 8 |
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) = @_; |