diff options
author | Abigail <abigail@abigail.be> | 2016-11-17 19:34:37 +0100 |
---|---|---|
committer | Abigail <abigail@abigail.be> | 2017-01-16 19:18:12 +0100 |
commit | 122d6c09702a0437a06efd713ba57d17175289bb (patch) | |
tree | 7e411aa62aa9f4677457e143937a13c4b3abf6a6 /pp_sys.c | |
parent | cb4e545c78f80e83e0fa1b400cdbc87d14149adf (diff) | |
download | perl-122d6c09702a0437a06efd713ba57d17175289bb.tar.gz |
Opening a file and dir using the same symbol will be fatal in 5.28.
Perl 5.10 deprecated using the same symbol to open both a filehandle
and a dirhandle, as this can lead to confusing code.
In Pelr 5.28, this will become a fatal error. This patch changes the
warning to reflect this.
Diffstat (limited to 'pp_sys.c')
-rw-r--r-- | pp_sys.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -630,7 +630,7 @@ PP(pp_open) if (IoDIRP(io)) Perl_ck_warner_d(aTHX_ packWARN2(WARN_IO, WARN_DEPRECATED), - "Opening dirhandle %" HEKf " also as a file", + "Opening dirhandle %" HEKf " also as a file. This will be a fatal error in Perl 5.28", HEKfARG(GvENAME_HEK(gv))); mg = SvTIED_mg((const SV *)io, PERL_MAGIC_tiedscalar); @@ -4008,7 +4008,7 @@ PP(pp_open_dir) if ((IoIFP(io) || IoOFP(io))) Perl_ck_warner_d(aTHX_ packWARN2(WARN_IO, WARN_DEPRECATED), - "Opening filehandle %" HEKf " also as a directory", + "Opening filehandle %" HEKf " also as a directory. This will be a fatal error in Perl 5.28", HEKfARG(GvENAME_HEK(gv)) ); if (IoDIRP(io)) PerlDir_close(IoDIRP(io)); |