summaryrefslogtreecommitdiffstats
path: root/gnu/usr.bin/perl/lib/File/stat.t
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/usr.bin/perl/lib/File/stat.t')
-rw-r--r--gnu/usr.bin/perl/lib/File/stat.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/usr.bin/perl/lib/File/stat.t b/gnu/usr.bin/perl/lib/File/stat.t
index 7c9b9cc340b..c403fc44980 100644
--- a/gnu/usr.bin/perl/lib/File/stat.t
+++ b/gnu/usr.bin/perl/lib/File/stat.t
@@ -144,7 +144,7 @@ for (split //, "tTB") {
SKIP: {
local *STAT;
- skip("Could not open file: $!", 2) unless open(STAT, $file);
+ skip("Could not open file: $!", 2) unless open(STAT, '<', $file);
isa_ok(File::stat::stat('STAT'), 'File::stat',
'... should be able to find filehandle');