branch master updated: * tp/Texinfo/ParserNonXS.pm (_end_line_starting_block): allow only one letter as @enumerate argument (same as XS parser).

[Patrice Dumas]

This is an automated email from the git hooks/post-receive script.

pertusus pushed a commit to branch master
in repository texinfo.

The following commit(s) were added to refs/heads/master by this push:
     new a39b302639 * tp/Texinfo/ParserNonXS.pm (_end_line_starting_block): 
allow only one letter as @enumerate argument (same as XS parser).
a39b302639 is described below

commit a39b3026394b2441fc6cca290658eb04c90e100e
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Tue Dec 6 20:17:48 2022 +0100

    * tp/Texinfo/ParserNonXS.pm (_end_line_starting_block): allow only
    one letter as @enumerate argument (same as XS parser).
---
 ChangeLog                 | 5 +++++
 tp/Texinfo/ParserNonXS.pm | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index c6ceff1507..c715b5031b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2022-12-06  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/ParserNonXS.pm (_end_line_starting_block): allow only
+       one letter as @enumerate argument (same as XS parser).
+
 2022-12-06  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/ParserNonXS.pm (_end_line_def_line),
diff --git a/tp/Texinfo/ParserNonXS.pm b/tp/Texinfo/ParserNonXS.pm
index 2a7a2548d4..eb3f91f5c3 100644
--- a/tp/Texinfo/ParserNonXS.pm
+++ b/tp/Texinfo/ParserNonXS.pm
@@ -3442,7 +3442,7 @@ sub _end_line_starting_block($$$)
         }
         my $arg = $current->{'args'}->[0]->{'contents'}->[0];
         if (!defined($arg->{'text'})
-            or $arg->{'text'} !~ /^(([[:digit:]]+)|([[:alpha:]]+))$/) {
+            or $arg->{'text'} !~ /^(([[:digit:]]+)|([[:alpha:]]))$/) {
           $self->_command_error($current, $source_info,
                       __("bad argument to \@%s"),
                       $current->{'cmdname'});