diff options
| author | Norbert Preining <preining@logic.at> | 2008-10-26 22:11:37 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-10-26 22:11:37 +0000 |
| commit | 79efd4658611e6110d8d4ab3ee435d7667c3d828 (patch) | |
| tree | 1b080991b63321caf437f06b0dc2eb35df4c3644 /Master/tlpkg/TeXLive | |
| parent | 7925bbdc4e738d87cbbe1661e87521dcb136d1af (diff) | |
fix the !!! something is missing, testing links with -e is not a good
idea, we need -l || -f
git-svn-id: svn://tug.org/texlive/trunk@11071 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
| -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 b1f859b9166..17dd6a408a2 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -603,10 +603,10 @@ sub make_container { open ZIP, "|-", @cmdline or die "Cannot open container program @cmdline: $!"; } map { - if (! -e $_) { - print STDERR "!!!Error: non-existent $_\n"; - } else { + if (-f $_ || -l $_) { print ZIP "$_\n"; + } else { + print STDERR "!!!Error: non-existent $_\n"; } } @files; close ZIP; |