1 files changed, 3 insertions, 0 deletions
diff --git a/djgpp/djgpp.c b/djgpp/djgpp.c
index f235421ae3..73573c37ea 100644
--- a/djgpp/djgpp.c
+++ b/djgpp/djgpp.c
@@ -367,6 +367,9 @@ 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);
 }