summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-01-20 13:12:14 -0800
committerFather Chrysostomos <sprout@cpan.org>2012-01-20 14:49:08 -0800
commit05bb32d213ce171a55a6a7226fba6f1f1fea3fd6 (patch)
treefbb613d8bfaa05bb03479116e0a9da8783f542a1 /pp_sys.c
parentb8413ac3c2aeba8d9cbe9ce77d7eafc3f5ae0fef (diff)
downloadperl-05bb32d213ce171a55a6a7226fba6f1f1fea3fd6.tar.gz
Warn for stat(*unopened) after statting file
Statting an existing file used to prevent a subsequent stat(*unopened) from warning if the GV happened to have no IO. If the GV *did* have an IO, but an unopened one, it *would* warn. This inconsistency was introduced in 5.10.0 with commit 5228a96c60 (which was also backported to 5.8.9).
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/pp_sys.c b/pp_sys.c
index b201827b86..20a34acfee 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -2796,6 +2796,7 @@ PP(pp_stat)
PL_laststatval = -1;
}
}
+ else PL_laststatval = -1;
if (PL_laststatval < 0 && !havefp) report_evil_fh(gv);
}