Please consider this patch, which fixes the issue:

--- texinfo/Texinfo/Parser.pm
+++ texinfo/Texinfo/Parser.pm
@@ -2973,7 +2973,8 @@
                         $current->{'cmdname'});
           }
           my $arg = 
$current->{'extra'}->{'block_command_line_contents'}->[0]->[0];
-          if (!defined($arg->{'text'}) or $arg->{'text'} !~ /^[[:alnum:]]$/) {
+          if (!defined($arg->{'text'}) or ($arg->{'text'} !~ /^[[:alnum:]]$/ 
and
+              $arg->{'text'} !~ /^[0-9]+$/)) {
             $self->_command_error($current, $line_nr, 
                         $self->__("bad argument to \@%s"),
                         $current->{'cmdname'});

--
Dmitry Shachnev

Attachment: signature.asc
Description: OpenPGP digital signature

Reply via email to