1 files changed, 1 insertions, 1 deletions
diff --git a/pp.c b/pp.c
index 5e32613ce7..4eb8f2f09f 100644
--- a/pp.c
+++ b/pp.c
@@ -2105,7 +2105,7 @@ PP(pp_crypt)
 #ifdef FCRYPT
     sv_setpv(TARG, fcrypt(tmps, SvPV(right, PL_na)));
 #else
-    sv_setpv(TARG, crypt(tmps, SvPV(right, PL_na)));
+    sv_setpv(TARG, PerlProc_crypt(tmps, SvPV(right, PL_na)));
 #endif
 #else
     DIE(