summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorRichard Leach <richardleach@users.noreply.github.com>2020-07-30 23:18:41 +0100
committerGitHub <noreply@github.com>2020-07-30 16:18:41 -0600
commita04ef3ff46f2526da1484bdd80995415ac7e1969 (patch)
tree41353a9a99afd1ce2f2aabbe07bc0b4523083988 /toke.c
parent9a2d423bf2574bc422a224b0042011206251ce19 (diff)
downloadperl-a04ef3ff46f2526da1484bdd80995415ac7e1969.tar.gz
Remove obsolete FCRYPT ifdefs and associated PL_cryptseen (#17624)
Co-authored-by: Karl Williamson <khw@cpan.org>
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c7
1 files changed, 1 insertions, 6 deletions
diff --git a/toke.c b/toke.c
index 52f378614e..27273d941e 100644
--- a/toke.c
+++ b/toke.c
@@ -7675,12 +7675,7 @@ yyl_word_or_keyword(pTHX_ char *s, STRLEN len, I32 key, I32 orig_keyword, struct
UNI(OP_CALLER);
case KEY_crypt:
-#ifdef FCRYPT
- if (!PL_cryptseen) {
- PL_cryptseen = TRUE;
- init_des();
- }
-#endif
+
LOP(OP_CRYPT,XTERM);
case KEY_chmod: