diff options
| author | Brian Fraser <fraserbn@gmail.com> | 2013-09-05 22:05:38 -0300 |
|---|---|---|
| committer | Brian Fraser <fraserbn@gmail.com> | 2013-09-21 08:47:42 -0300 |
| commit | adf4621acac87682086f49be53bd2a451ace02ea (patch) | |
| tree | 5578fb0ca7ec7a485b7f749314f38ec416a7ceed /djgpp | |
| parent | 009819bba34f5d921632a25a7dcbb643b435c0e9 (diff) | |
| download | perl-adf4621acac87682086f49be53bd2a451ace02ea.tar.gz | |
Removed the ifdefs for INCOMPLETE_TAINTS
This was added in 5.5/5.6 as a backwards-compatibility measure
when taint was extended to happen in more places.
Diffstat (limited to 'djgpp')
| -rw-r--r-- | djgpp/djgpp.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/djgpp/djgpp.c b/djgpp/djgpp.c index 9370a2901c..6d136e38bb 100644 --- a/djgpp/djgpp.c +++ b/djgpp/djgpp.c @@ -352,9 +352,7 @@ XS(dos_GetCwd) ST(0)=sv_newmortal (); if (getcwd (tmp,PATH_MAX+1)!=NULL) sv_setpv ((SV*)ST(0),tmp); -#ifndef INCOMPLETE_TAINTS SvTAINTED_on(ST(0)); -#endif } XSRETURN (1); } @@ -377,9 +375,7 @@ XS(XS_Cwd_sys_cwd) RETVAL = getcwd(p, MAXPATHLEN); ST(0) = sv_newmortal(); sv_setpv((SV*)ST(0), RETVAL); -#ifndef INCOMPLETE_TAINTS SvTAINTED_on(ST(0)); -#endif } XSRETURN(1); } |