diff options
author | George Greer <perl@greerga.m-l.org> | 2010-07-26 22:56:44 -0400 |
---|---|---|
committer | George Greer <perl@greerga.m-l.org> | 2010-07-26 22:56:44 -0400 |
commit | 63dccf309ff0f6b8b18d015680b031eada62ee2e (patch) | |
tree | 2a988c4da0399c37b2b5b65d742c86579e3bdf75 /t | |
parent | 3795add070c417abc47034ebff49945eaac4f6b5 (diff) | |
download | perl-63dccf309ff0f6b8b18d015680b031eada62ee2e.tar.gz |
Add filename with spurious +x bit to diag in t/porting/exec-bit.t
This is for the benefit of smoke logs where the "not ok" aren't
shown but the diag() output is.
Diffstat (limited to 't')
-rw-r--r-- | t/porting/exec-bit.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/porting/exec-bit.t b/t/porting/exec-bit.t index 7971ed7c27..aa09ac87c2 100644 --- a/t/porting/exec-bit.t +++ b/t/porting/exec-bit.t @@ -33,7 +33,7 @@ for my $f ( @manifest ) { next unless -x "../$f"; ok( $exe_list{$f}, "tarball will chmod +x $f" ) - or diag( "Remove the exec bit or add to Porting/exec-bit.txt" ); + or diag( "Remove the exec bit or add '$f' to Porting/exec-bit.txt" ); delete $exe_list{$f}; # seen it } |