diff options
author | Norbert Preining <preining@logic.at> | 2008-01-07 11:18:51 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-01-07 11:18:51 +0000 |
commit | 846a792a0553743bec356437131e98c3242f821f (patch) | |
tree | 07c38379c0461d0753cbda3b5b576cfc4ce3fd08 /Master | |
parent | 850b5ec023ef8e7217fa03c744ed8f710428c31a (diff) |
TLPOBJ make_container should die if it cannot call the compress cmd
git-svn-id: svn://tug.org/texlive/trunk@6098 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index fc6f6f5edb4..2c9586ff775 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -569,7 +569,7 @@ sub make_container { } unlink("$destdir/$containername"); print "$compresscmd\n" if ($::opt_debug); - open ZIP, $compresscmd ; + open ZIP, $compresscmd or die "Cannot open container program $compresscmd: $!\n"; map { if (! -f $_) { print STDERR "!!!Error: non-existent $_\n"; |