summaryrefslogtreecommitdiff
path: root/taint.c
diff options
context:
space:
mode:
Diffstat (limited to 'taint.c')
-rw-r--r--taint.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/taint.c b/taint.c
index efe5dc413e..bf42ddfd27 100644
--- a/taint.c
+++ b/taint.c
@@ -130,7 +130,7 @@ Perl_taint_env(pTHX)
}
#endif /* VMS */
- svp = hv_fetch(GvHVn(PL_envgv),"PATH",4,FALSE);
+ svp = hv_fetchs(GvHVn(PL_envgv),"PATH",FALSE);
if (svp && *svp) {
if (SvTAINTED(*svp)) {
TAINT;
@@ -144,7 +144,7 @@ Perl_taint_env(pTHX)
#ifndef VMS
/* tainted $TERM is okay if it contains no metachars */
- svp = hv_fetch(GvHVn(PL_envgv),"TERM",4,FALSE);
+ svp = hv_fetchs(GvHVn(PL_envgv),"TERM",FALSE);
if (svp && *svp && SvTAINTED(*svp)) {
STRLEN len;
const bool was_tainted = PL_tainted;