*** empty log message ***

1 files changed, 2 insertions, 2 deletions

diff --git a/extract_archive b/extract_archive
index 559d51b..62dac46 100755
--- a/extract_archive
+++ b/extract_archive
@@ -199,7 +199,7 @@ sub main {
 
     foreach my $file (@file) {
 	#- check for presence of file, but do not abort, continue with others.
-	$data{$file} or print STDERR "unable to find file $file in archive $archivename\n";
+	$data{$file} or do { print STDERR "unable to find file $file in archive $archivename\n"; next };
 
 	my $newfile = "$dir/$file";
 
@@ -214,7 +214,7 @@ sub main {
 		$extract_table{$data{$file}[1]}[0] == $data{$file}[2] or die "mismatched relocation in toc\n";
 		last;
 	    };
-	    die "unknown extension $_ when uncompressing archive $archivename\n";
+	    die "unknown extension \"$_\" when uncompressing archive $archivename\n";
 	}
     }