diff options
author | Karl Berry <karl@freefriends.org> | 2007-09-25 17:58:20 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2007-09-25 17:58:20 +0000 |
commit | 8c545d4462863c295083895578e143d688b85ac8 (patch) | |
tree | fe9315f309c01f5b78c64f5acc6749b0e2361c07 /Build/cdbuild | |
parent | 6135faa42c085d5b19645b719b1d49bacf8d40b5 (diff) |
try -e instead of -f, so we also do
removal/addition of symlinks.
git-svn-id: svn://tug.org/texlive/trunk@5041 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/cdbuild')
-rwxr-xr-x | Build/cdbuild/place | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Build/cdbuild/place b/Build/cdbuild/place index 9e22e4a0a67..ad9b7b8f408 100755 --- a/Build/cdbuild/place +++ b/Build/cdbuild/place @@ -137,7 +137,7 @@ foreach $file (sort keys %Old) { # and if the file does not exist, don't try to remove it -- we # probably did so by hand and didn't bother to update the tpm. - next unless -f "$M/$file"; + next unless -e "$M/$file"; # don't remove tpm or lists file, they won't be in the new package. if (! $New{$file} && $file !~ /\.tpm$/ && $file !~ m,/lists/[^/]+$,) { @@ -215,7 +215,7 @@ sub buildfilelist sub files { - if (-f) { + if (-e) { $This=$File::Find::name; $This =~ s/^\.\///; $New{$This}=1; |