From 5d121f7f3e622b953c8ef74cf9c345d07e4f4ed7 Mon Sep 17 00:00:00 2001
From: Rick Delaney <rick@consumercontact.com>
Date: Sun, 9 Jul 2006 11:01:50 -0400
Subject: Re: [perl #39733] $AUTOLOAD is never tainted Message-ID:
 <20060709190150.GA1922@localhost.localdomain>

Plus a note in perldelta

p4raw-id: //depot/perl@28649
---
 gv.c | 1 -
 1 file changed, 1 deletion(-)

(limited to 'gv.c')

diff --git a/gv.c b/gv.c
index 4187c18c7b..da6b2ade97 100644
--- a/gv.c
+++ b/gv.c
@@ -654,7 +654,6 @@ Perl_gv_autoload4(pTHX_ HV *stash, const char *name, STRLEN len, I32 method)
     sv_setpvn(varsv, packname, packname_len);
     sv_catpvs(varsv, "::");
     sv_catpvn(varsv, name, len);
-    SvTAINTED_off(varsv);
     return gv;
 }
 
-- 
cgit v1.2.1