diff options
| author | Yves Orton <demerphq@gmail.com> | 2006-12-29 22:45:51 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-01-04 14:30:02 +0000 |
| commit | 44a2ac759eaf811ea851bdf9177a51bf9b95b5ce (patch) | |
| tree | de91bdd2393df02ca17ddee82d06318cda92010e /doop.c | |
| parent | 1f2e791661e807f561a2d5dd8f2b6a4e339e444e (diff) | |
| download | perl-44a2ac759eaf811ea851bdf9177a51bf9b95b5ce.tar.gz | |
Re: [PATCH] Change implementation of %+ to use a proper tied hash interface and add support for %-
Message-ID: <9b18b3110612291245q792fe91cu69422d2b81bb4f0b@mail.gmail.com>
p4raw-id: //depot/perl@29682
Diffstat (limited to 'doop.c')
| -rw-r--r-- | doop.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -1434,8 +1434,7 @@ Perl_do_kv(pTHX) RETURN; } - if (! SvTIED_mg((SV*)keys, PERL_MAGIC_tied) - && ! SvTIED_mg((SV*)keys, PERL_MAGIC_regdata_names)) + if (! SvTIED_mg((SV*)keys, PERL_MAGIC_tied) ) { i = HvKEYS(keys); } |