summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorSteven Schubiger <schubiger@cpan.org>2006-02-02 11:38:49 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-02-02 14:24:03 +0000
commitbd61b36601703dd438f87762f0c4d23a6aeb375d (patch)
tree7939c0eb28c48259a8b421478016b2964cbf82d7 /doop.c
parentfafc274c285207343d70f4a0d51c29a2f492863a (diff)
downloadperl-bd61b36601703dd438f87762f0c4d23a6aeb375d.tar.gz
Re: [PATCH] s/Null(av|ch)/NULL/g
Message-ID: <20060202093849.GD12591@accognoscere.homeunix.org> p4raw-id: //depot/perl@27054
Diffstat (limited to 'doop.c')
-rw-r--r--doop.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/doop.c b/doop.c
index 1d81ca07f6..e84816ae2e 100644
--- a/doop.c
+++ b/doop.c
@@ -1390,7 +1390,7 @@ Perl_do_kv(pTHX)
if (PL_op->op_flags & OPf_MOD || LVRET) { /* lvalue */
if (SvTYPE(TARG) < SVt_PVLV) {
sv_upgrade(TARG, SVt_PVLV);
- sv_magic(TARG, Nullsv, PERL_MAGIC_nkeys, Nullch, 0);
+ sv_magic(TARG, Nullsv, PERL_MAGIC_nkeys, NULL, 0);
}
LvTYPE(TARG) = 'k';
if (LvTARG(TARG) != (SV*)keys) {