From 8c545d4462863c295083895578e143d688b85ac8 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 25 Sep 2007 17:58:20 +0000 Subject: 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 --- Build/cdbuild/place | 4 ++-- 1 file 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; -- cgit v1.2.3