diff options
author | Dave Mitchell <davem@fdisolutions.com> | 2005-07-07 14:47:51 +0000 |
---|---|---|
committer | Dave Mitchell <davem@fdisolutions.com> | 2005-07-07 14:47:51 +0000 |
commit | 871f090acdc7c90327d56a3b506612ce1d40296b (patch) | |
tree | 3349f5c3d5c7e047ae89b95601b0c0d5ac745e02 /mg.c | |
parent | 7e2483e5c2512b3d95ae2950a46866198b455d71 (diff) | |
download | perl-871f090acdc7c90327d56a3b506612ce1d40296b.tar.gz |
more taint fallout from change 24943
p4raw-id: //depot/perl@25094
Diffstat (limited to 'mg.c')
-rw-r--r-- | mg.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1913,7 +1913,7 @@ int Perl_magic_gettaint(pTHX_ SV *sv, MAGIC *mg) { PERL_UNUSED_ARG(sv); - TAINT_IF(mg->mg_len & 1); + TAINT_IF((PL_localizing != 1) && (mg->mg_len & 1)); return 0; } |