diff options
| author | Norbert Preining <preining@logic.at> | 2016-05-19 00:39:50 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2016-05-19 00:39:50 +0000 |
| commit | 1e1c08f1e4b530ba7cbaccbc0f359df07ff79b5e (patch) | |
| tree | 792854c64c2b39ebd67cc9166cffc92de8d9d809 /Master/tlpkg/TeXLive/TLPOBJ.pm | |
| parent | 0116c04d839b459be2e0eb41e5e7183e1bc0c2c3 (diff) | |
TLPDB: sys container: logic error
git-svn-id: svn://tug.org/texlive/trunk@41250 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPOBJ.pm')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index 91a06c32a29..8f9cbf33196 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -602,9 +602,9 @@ sub make_container { # overflow standard tar format and result in special things being # done. We don't want the GNU-specific special things. # - my $is_sys_container = ( $containername =~ /\.r[0-9]/ ); + my $is_user_container = ( $containername =~ /\.r[0-9]/ ); my @attrs - = $is_sys_container + = $is_user_container ? () : ( "--owner", "0", "--group", "0", "--exclude", ".svn", "--format", "ustar" ); @@ -688,7 +688,7 @@ sub make_container { # if we are creating a system container, or there is a way to # compute the checksums, do it my $checksum = ""; - if ($is_sys_container || $::checksum_method) { + if (!$is_user_container || $::checksum_method) { $checksum = TeXLive::TLCrypto::tlchecksum("$destdir/$containername"); } |