From ca3d0bd89464bb3e80b2eece1689b6d2ac3af7ee Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Sun, 20 Jul 2014 19:44:38 -0700 Subject: [PATCH] ignore symlinks too --- archive_photos | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/archive_photos b/archive_photos index 16bd258..aaa9d94 100755 --- a/archive_photos +++ b/archive_photos @@ -122,7 +122,7 @@ find(\&file_pusher,@dirs) if @dirs; # find already existing files my %existing_files; -find(sub { if (-f $_) {$existing_files{$_} = $File::Find::name;} },$options{archive_dir}); +find(sub { if (-f $_ or -l $_) {$existing_files{$_} = $File::Find::name;} },$options{archive_dir}); for my $file (@files) { my $file_basename=basename($file); -- 2.39.2