From 45f22f0f2ac1ad1b4b75944bcf07e0c75c631e7a Mon Sep 17 00:00:00 2001 From: dormando Date: Sun, 29 Jul 2012 20:53:31 -0700 Subject: descriptive errors for t/whitespace.t --- t/whitespace.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/whitespace.t b/t/whitespace.t index 22c610c..f3629ab 100755 --- a/t/whitespace.t +++ b/t/whitespace.t @@ -29,7 +29,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; -- cgit v1.2.1