diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-23 18:55:13 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-23 18:55:13 +0000 |
commit | fe5e78edd9ab337ef125ca9ff835e10989fe0004 (patch) | |
tree | 5c7c7beea0775581d2050b16e4843033dc8deb3f /pp.c | |
parent | 09ecc4b69a964aa52843e24f44be5f67b6fadd59 (diff) | |
download | perl-fe5e78edd9ab337ef125ca9ff835e10989fe0004.tar.gz |
[win32] merge change#1015 from maintbranch (must revisit 1014 later, is
incomplete)
p4raw-link: @1015 on //depot/maint-5.004/perl: 64d1d4c7d00380b54e18db9c0a16ddef0f41b0a2
p4raw-id: //depot/win32/perl@1029
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -773,7 +773,7 @@ PP(pp_undef) hv_undef((HV*)sv); break; case SVt_PVCV: - if (cv_const_sv((CV*)sv)) + if (dowarn && cv_const_sv((CV*)sv)) warn("Constant subroutine %s undefined", CvANON((CV*)sv) ? "(anonymous)" : GvENAME(CvGV((CV*)sv))); /* FALL THROUGH */ |