aboutsummaryrefslogtreecommitdiffstats
path: root/extract_archive
diff options
context:
space:
mode:
Diffstat (limited to 'extract_archive')
-rwxr-xr-xextract_archive6
1 files changed, 3 insertions, 3 deletions
diff --git a/extract_archive b/extract_archive
index cdd98da..7bee205 100755
--- a/extract_archive
+++ b/extract_archive
@@ -197,10 +197,10 @@ sub main {
#- compute closure.
@file = compute_closure(@file);
- #- check all file given are in the archive before continuing.
- foreach (@file) { $data{$_} or die "unable to find file $_ in archive $archivename\n"; }
-
foreach my $file (@file) {
+ #- check for presence of file, but do not abort, continue with others.
+ $data{$_} or print STDERR "unable to find file $_ in archive $archivename\n";
+
my $newfile = "$dir/$file";
print "extracting $file\n";