X-Git-Url: https://git.m6w6.name/?a=blobdiff_plain;f=memcached%2Ft%2Fwhitespace.t;h=7d5d91691341f64ccfd38da9df77df4e165f53c5;hb=acdfe4229a70c323e66c37e2768dfdea42694bb1;hp=22c610cbda2563d813b9258db1dfa61ce730491e;hpb=81204a653b40f87ae9f43fd8ee12cc8177021f3a;p=m6w6%2Flibmemcached

diff --git a/memcached/t/whitespace.t b/memcached/t/whitespace.t
index 22c610cb..7d5d9169 100755
--- a/memcached/t/whitespace.t
+++ b/memcached/t/whitespace.t
@@ -6,10 +6,11 @@ our @files;
 BEGIN {
     chdir "$Bin/.." or die;
 
-    my @exempted = qw(Makefile.am ChangeLog doc/Makefile.am);
+    my @exempted = qw(Makefile.am ChangeLog doc/Makefile.am README README.md);
     push(@exempted, glob("doc/*.xml"));
     push(@exempted, glob("doc/xml2rfc/*.xsl"));
     push(@exempted, glob("m4/*backport*m4"));
+    push(@exempted, glob("*.orig"));
     my %exempted_hash = map { $_ => 1 } @exempted;
 
     my @stuff = split /\0/, `git ls-files -z -c -m -o --exclude-standard`;
@@ -29,7 +30,7 @@ BEGIN {
 use Test::More tests => scalar(@files);
 
 foreach my $f (@files) {
-    open(my $fh, $f) or die;
+    open(my $fh, $f) or die "Cannot open file $f: $!";
     my $before = do { local $/; <$fh>; };
     close ($fh);
     my $after = $before;