X-Git-Url: https://ruderich.org/simon/gitweb/?p=blhc%2Fblhc.git;a=blobdiff_plain;f=bin%2Fblhc;h=e8849260607f8598aafea529a8731136f0ecf451;hp=b8aafb4a01dab62e322d1d981f5b95cce8c5afa0;hb=c7f137f3fdbeb3fc9e300ba41b977d79109967ea;hpb=43ae9dd1edaa5e4cbe3ba2fc7693e90745d15948

diff --git a/bin/blhc b/bin/blhc
index b8aafb4..e884926 100755
--- a/bin/blhc
+++ b/bin/blhc
@@ -533,7 +533,7 @@ FILE:
 foreach my $file (@ARGV) {
     print "checking '$file'...\n" if scalar @ARGV > 1;
 
-    open my $fh, '<', $file or die "$!: $file";
+    open my $fh, '<', $file or die $!;
 
     # Architecture of this file.
     my $arch = $option_arch;