summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
author☢ ℕicolas ℝ <nicolas@atoomic.org>2020-08-04 14:03:00 -0600
committer☢ ℕicolas ℝ <nicolas@atoomic.org>2020-08-04 14:03:01 -0600
commit92322c4fbb54efc52dc5328e5faa4cfc1784f05e (patch)
tree7da1ec98470dff36da6a99f027b57df1270762ef /toke.c
parentcbc2e172638d5b0ae0822c0291ac91c2bcd3f137 (diff)
downloadperl-92322c4fbb54efc52dc5328e5faa4cfc1784f05e.tar.gz
Use PERL_REVISION in toke.c for -E switch
This allows to use the current features bundle defined by the current version of Perl.
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 27273d941e..64550fae3e 100644
--- a/toke.c
+++ b/toke.c
@@ -8713,7 +8713,7 @@ yyl_try(pTHX_ char *s)
}
if (PL_minus_E)
sv_catpvs(PL_linestr,
- "use feature ':5." STRINGIFY(PERL_VERSION) "';");
+ "use feature ':" STRINGIFY(PERL_REVISION) "." STRINGIFY(PERL_VERSION) "';");
if (PL_minus_n || PL_minus_p) {
sv_catpvs(PL_linestr, "LINE: while (<>) {"/*}*/);
if (PL_minus_l)