texinfo/tp/Texinfo/Convert XML.pm

[Patrice Dumas]

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        11/10/19 21:21:41

Modified files:
        tp/Texinfo/Convert: XML.pm 

Log message:
        Handle misc command type skipspace.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Convert/XML.pm?cvsroot=texinfo&r1=1.46&r2=1.47

Patches:
Index: XML.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Convert/XML.pm,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -b -r1.46 -r1.47
--- XML.pm      1 Oct 2011 22:54:12 -0000       1.46
+++ XML.pm      19 Oct 2011 21:21:41 -0000      1.47
@@ -590,7 +590,7 @@
           return '';
         }
         return "<$command></$command>\n";
-      } elsif ($type eq 'noarg') {
+      } elsif ($type eq 'noarg' or $type eq 'skipspace') {
         return "<$command></$command>";
       } elsif ($type eq 'special') {
         if ($root->{'cmdname'} eq 'clear' or $root->{'cmdname'} eq 'set') {
@@ -630,7 +630,7 @@
           return "<${command}>$value</${command}>\n";
         }
       } else {
-        print STDERR "BUG: unknown misc_command style $type" if ($type !~ 
/^\d$/);
+        print STDERR "BUG: unknown misc_command style $type\n" if ($type !~ 
/^\d$/);
         my $args_attributes;
         if ($misc_command_numbered_arguments_attributes{$root->{'cmdname'}}) {
           $args_attributes = 
$misc_command_numbered_arguments_attributes{$root->{'cmdname'}};