diff options
| author | Andy Lester <andy@petdance.com> | 2005-12-05 07:46:13 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-12-06 17:23:09 +0000 |
| commit | 0bd48802b00657d8da2da444a1c97fb25cb7d562 (patch) | |
| tree | 0843dbed7bc7b59e6c3926ed70780c7e9ae79a34 /taint.c | |
| parent | 05f9f7bb7728f3c6ba669b2c4adc66fe958a9b51 (diff) | |
| download | perl-0bd48802b00657d8da2da444a1c97fb25cb7d562.tar.gz | |
More consting, and putting stuff in embed.fnc
Message-ID: <20051205194613.GB7791@petdance.com>
p4raw-id: //depot/perl@26281
Diffstat (limited to 'taint.c')
| -rw-r--r-- | taint.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -161,7 +161,7 @@ Perl_taint_env(pTHX) #endif /* !VMS */ for (e = misc_env; *e; e++) { - SV ** const svp = hv_fetch(GvHVn(PL_envgv), *e, strlen(*e), FALSE); + SV * const * const svp = hv_fetch(GvHVn(PL_envgv), *e, strlen(*e), FALSE); if (svp && *svp != &PL_sv_undef && SvTAINTED(*svp)) { TAINT; taint_proper("Insecure $ENV{%s}%s", *e); |