[8153] def leave empty_line_after_command alone

[gavinsmith0123]

Revision: 8153
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=8153
Author:   gavin
Date:     2018-09-02 06:20:29 -0400 (Sun, 02 Sep 2018)
Log Message:
-----------
def leave empty_line_after_command alone

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/tp/Texinfo/Convert/DocBook.pm
    trunk/tp/Texinfo/Convert/TexinfoXML.pm

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2018-09-02 10:15:53 UTC (rev 8152)
+++ trunk/ChangeLog     2018-09-02 10:20:29 UTC (rev 8153)
@@ -1,3 +1,10 @@
+2018-09-02  Gavin Smith  <address@hidden>
+
+       * tp/Texinfo/Convert/TexinfoXML.pm (_convert),
+       * tp/Texinfo/Convert/DocBook.pm (_convert): Leave an 
+       'empty_line_after_command' element alone just as 
+       'empty_spaces_after_command' is left alone.
+
 2018-09-01  Gavin Smith  <address@hidden>
 
        * tp/maintain/regenerate_cmd_tests.sh: Do not print diffs if

Modified: trunk/tp/Texinfo/Convert/DocBook.pm
===================================================================
--- trunk/tp/Texinfo/Convert/DocBook.pm 2018-09-02 10:15:53 UTC (rev 8152)
+++ trunk/tp/Texinfo/Convert/DocBook.pm 2018-09-02 10:20:29 UTC (rev 8153)
@@ -1302,7 +1302,9 @@
         }
         foreach my $arg (@{$root->{'args'}->[0]->{'contents'}}) {
           next if $arg->{'type'}
-                   and $arg->{'type'} eq 'empty_spaces_after_command';
+                   and ($arg->{'type'} eq 'empty_spaces_after_command'
+                        or $arg->{'type'} eq 'empty_line_after_command');
+
           my $type = $arg->{'extra'}->{'def_role'};
           next if !$type and $arg->{'type'} eq 'spaces';
 

Modified: trunk/tp/Texinfo/Convert/TexinfoXML.pm
===================================================================
--- trunk/tp/Texinfo/Convert/TexinfoXML.pm      2018-09-02 10:15:53 UTC (rev 
8152)
+++ trunk/tp/Texinfo/Convert/TexinfoXML.pm      2018-09-02 10:20:29 UTC (rev 
8153)
@@ -1502,7 +1502,8 @@
         }
         foreach my $arg (@{$root->{'args'}->[0]->{'contents'}}) {
           next if $arg->{'type'}
-                   and $arg->{'type'} eq 'empty_spaces_after_command';
+                   and ($arg->{'type'} eq 'empty_spaces_after_command'
+                         or $arg->{'type'} eq 'empty_line_after_command');
           my $type = $arg->{'extra'}->{'def_role'};
           next if !$type and $arg->{'type'} eq 'spaces';
           my $content = $self->_convert($arg);