diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-02 13:27:38 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-02 13:27:38 +0000 |
commit | 624590503086714d933ceb5a7947b31f6a66beb9 (patch) | |
tree | 728e5bfdf9bc16cc89cd2153ea62eea69efcb15b /pp_sys.c | |
parent | 436933950535d3942db23a87c1a6344f566a9af4 (diff) | |
download | perl-624590503086714d933ceb5a7947b31f6a66beb9.tar.gz |
The name of a filehandle does not have <these>.
p4raw-id: //depot/perl@6490
Diffstat (limited to 'pp_sys.c')
-rw-r--r-- | pp_sys.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3059,7 +3059,7 @@ PP(pp_fttext) else { if (ckWARN(WARN_UNOPENED)) { gv = cGVOP_gv; - Perl_warner(aTHX_ WARN_UNOPENED, "Test on unopened file <%s>", + Perl_warner(aTHX_ WARN_UNOPENED, "Test on unopened file %s", GvENAME(gv)); } SETERRNO(EBADF,RMS$_IFI); |