branch master updated: tp/Texinfo/Convert/DocBook.pm: change some variable names.

[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 2f9b20d  tp/Texinfo/Convert/DocBook.pm: change some variable names.
2f9b20d is described below

commit 2f9b20df1b4b9b5285b192380b6f19f5689f23cd
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Sat Sep 11 13:54:35 2021 +0200

    tp/Texinfo/Convert/DocBook.pm: change some variable names.
---
 tp/Texinfo/Convert/DocBook.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/tp/Texinfo/Convert/DocBook.pm b/tp/Texinfo/Convert/DocBook.pm
index 26a1392..b4daf95 100644
--- a/tp/Texinfo/Convert/DocBook.pm
+++ b/tp/Texinfo/Convert/DocBook.pm
@@ -397,15 +397,15 @@ sub _docbook_section_element($$)
   if (exists $docbook_sections{$heading_level}) {
     return $docbook_sections{$heading_level};
   }
-  my $command = $self->_level_corrected_section($element);
-  if ($command eq 'unnumbered'
+  my $level_corrected_sectioning_cmdname = 
$self->_level_corrected_section($element);
+  if ($level_corrected_sectioning_cmdname eq 'unnumbered'
       and $element->{'extra'}->{'associated_node'}
       and $element->{'extra'}->{'associated_node'}->{'extra'}->{'normalized'}
       and 
$docbook_special_unnumbered{lc($element->{'extra'}->{'associated_node'}->{'extra'}->{'normalized'})})
 {
     return 
lc($element->{'extra'}->{'associated_node'}->{'extra'}->{'normalized'});
   }
 
-  return $docbook_sections{$command};
+  return $docbook_sections{$level_corrected_sectioning_cmdname};
 }
 
 sub _index_entry($$)
@@ -1481,9 +1481,9 @@ sub _convert($$;$)
     if ($command eq 'part' and !Texinfo::Common::is_content_empty($element)) {
       $result .= "</partintro>\n";
     }
-    my $command_texi = $self->_level_corrected_section($element);
+    my $level_corrected_sectioning_cmdname = 
$self->_level_corrected_section($element);
     if (!($element->{'section_childs'} and 
scalar(@{$element->{'section_childs'}}))
-        or $command_texi eq 'top') {
+        or $level_corrected_sectioning_cmdname eq 'top') {
       $result .= "</$command>\n";
       pop @{$self->{'lang_stack'}};
       my $current = $element;