From 35985dc620eb38a6f7f028617cea43d48268a777 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 4 Apr 2000 11:14:33 +0000 Subject: *** empty log message *** --- extract_archive | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'extract_archive') 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"; -- cgit v1.2.1