This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
util.c:report_evil_fh: Report name w/initial null
authorFather Chrysostomos <sprout@cpan.org>
Fri, 25 May 2012 05:46:56 +0000 (22:46 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Thu, 7 Jun 2012 15:18:52 +0000 (08:18 -0700)
commit1e00d6e92a9b49086ba010b4c50b9362ce8f2caa
tree24ed3e7e122c5208d774719e11dfc959c03deccd
parent877e92d0ed656f4550e604d6c599c78ec1eb6765
util.c:report_evil_fh: Report name w/initial null

In the error message, we shouldn’t omit a handle whose name begins
with "\0", but, rather, a handle whose name has no length to it.
t/lib/warnings/pp_hot
util.c