Branch: refs/heads/blead
Home: https://github.com/Perl/perl5
Commit: ed39ffd1f1e2a7dfdff7cf610dee2a2a481d95e4
https://github.com/Perl/perl5/commit/ed39ffd1f1e2a7dfdff7cf610dee2a2a481d95e4
Author: Lukas Mai <lukasmai....@gmail.com>
Date: 2024-11-19 (Tue, 19 Nov 2024)
Changed paths:
M pod/perldelta.pod
M t/base/lex.t
M toke.c
Log Message:
-----------
toke.c: fix =cut detection
A line starting with `=cut` is only a cut directive if the next
character is not a word character. Checking for isALPHA is insufficient
because POD directives can contain digits (e.g. `=head1`, `=head2`).
Add the same check to the string eval case, where it was missing
entirely.
Fixes #22759.
To unsubscribe from these emails, change your notification settings at
https://github.com/Perl/perl5/settings/notifications
