texinfo-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: Change in spaces and remove a comment


From: Patrice Dumas
Subject: branch master updated: Change in spaces and remove a comment
Date: Fri, 05 Aug 2022 06:58:18 -0400

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 ffe4f5cfbe Change in spaces and remove a comment
ffe4f5cfbe is described below

commit ffe4f5cfbe610c6b78d3efa7e13d6d1f47a9c1bb
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Fri Aug 5 12:57:52 2022 +0200

    Change in spaces and remove a comment
---
 tp/Texinfo/Convert/Converter.pm | 35 ++++++++++++++++++++---------------
 tp/Texinfo/Convert/HTML.pm      |  2 +-
 2 files changed, 21 insertions(+), 16 deletions(-)

diff --git a/tp/Texinfo/Convert/Converter.pm b/tp/Texinfo/Convert/Converter.pm
index 7ae507c02f..e1cdb75837 100644
--- a/tp/Texinfo/Convert/Converter.pm
+++ b/tp/Texinfo/Convert/Converter.pm
@@ -84,11 +84,12 @@ my %common_converters_defaults = (
   'PROGRAM'              => '',
 );
 
-my %all_converters_defaults = 
(%Texinfo::Common::default_converter_command_line_options,
-  %Texinfo::Common::default_converter_customization,
-  %Texinfo::Common::document_settable_unique_at_commands,
-  %Texinfo::Common::document_settable_multiple_at_commands,
-  %common_converters_defaults
+my %all_converters_defaults
+ = (%Texinfo::Common::default_converter_command_line_options,
+    %Texinfo::Common::default_converter_customization,
+    %Texinfo::Common::document_settable_unique_at_commands,
+    %Texinfo::Common::document_settable_multiple_at_commands,
+    %common_converters_defaults
 );
 
 # For translation of in document string.
@@ -204,7 +205,8 @@ sub converter(;$)
 
       $converter->{'floats'} = $floats if ($floats);
       $converter->{'labels'} = $labels if ($labels);
-      $converter->{'indices_information'} = 
$conf->{'parser'}->indices_information();
+      $converter->{'indices_information'}
+             = $conf->{'parser'}->indices_information();
       $converter->{'values'} = $conf->{'parser'}->{'values'};
       delete $conf->{'parser'};
     }
@@ -573,8 +575,8 @@ sub determine_files_and_directory($;$)
            and $self->{'global_commands'}->{'setfilename'}
            and $self->{'global_commands'}->{'setfilename'}->{'extra'}
            and 
defined($self->{'global_commands'}->{'setfilename'}->{'extra'}->{'text_arg'})) {
-     $setfilename
-       = $self->{'global_commands'}->{'setfilename'}->{'extra'}->{'text_arg'};
+    $setfilename
+      = $self->{'global_commands'}->{'setfilename'}->{'extra'}->{'text_arg'};
   }
 
   my $input_basename_for_outfile = $input_basename;
@@ -591,7 +593,8 @@ sub determine_files_and_directory($;$)
   # determine output file and output file name
   my $output_file;
   if (!defined($self->get_conf('OUTFILE'))) {
-    if (defined($setfilename_for_outfile) and 
!$self->get_conf('NO_USE_SETFILENAME')) {
+    if (defined($setfilename_for_outfile)
+        and !$self->get_conf('NO_USE_SETFILENAME')) {
       $output_file = $setfilename_for_outfile;
       $document_path = $setfilename_for_outfile;
       $document_path =~ s/\.[^\.]*$//;
@@ -688,9 +691,10 @@ sub normalized_sectioning_command_filename($$)
   $no_unidecode = 1 if (defined($self->get_conf('USE_UNIDECODE'))
                         and !$self->get_conf('USE_UNIDECODE'));
 
-  my $normalized_name = 
Texinfo::Convert::NodeNameNormalization::transliterate_texinfo(
-       {'contents' => $command->{'args'}->[0]->{'contents'}},
-                $no_unidecode);
+  my $normalized_name
+    = Texinfo::Convert::NodeNameNormalization::transliterate_texinfo(
+         {'contents' => $command->{'args'}->[0]->{'contents'}},
+                  $no_unidecode);
 
   my $filename = $self->_id_to_filename($normalized_name);
   $filename .= '.'.$self->get_conf('EXTENSION')
@@ -718,7 +722,7 @@ sub node_information_filename($$)
       $filename = $node_info->{'normalized'};
     }
   } elsif (defined($node_info->{'node_content'})) {
-    $filename = Texinfo::Convert::NodeNameNormalization::normalize_node (
+    $filename = Texinfo::Convert::NodeNameNormalization::normalize_node(
              { 'contents' => $node_info->{'node_content'} });
   } else {
     $filename = '';
@@ -899,7 +903,7 @@ sub _set_tree_units_files($$$$$$)
         }
       }
       $tree_unit->{'structure'}->{'unit_filename'}
-         = 
$tree_unit->{'extra'}->{'first_in_page'}->{'structure'}->{'unit_filename'};
+        = 
$tree_unit->{'extra'}->{'first_in_page'}->{'structure'}->{'unit_filename'};
     }
   }
 
@@ -1355,7 +1359,8 @@ sub sort_element_counts($$;$$)
   my $max_length = length($max_count);
   my $result = '';
   foreach my $sorted_count (@sorted_name_counts_array) {
-    $result .=  sprintf("%${max_length}d  $sorted_count->[1]\n", 
$sorted_count->[0]);
+    $result .=  sprintf("%${max_length}d  $sorted_count->[1]\n",
+                        $sorted_count->[0]);
   }
   return (\@sorted_name_counts_array, $result);
 }
diff --git a/tp/Texinfo/Convert/HTML.pm b/tp/Texinfo/Convert/HTML.pm
index d7ccff9967..18bdbd8b84 100644
--- a/tp/Texinfo/Convert/HTML.pm
+++ b/tp/Texinfo/Convert/HTML.pm
@@ -8226,7 +8226,7 @@ sub _external_node_href($$$$)
       if (defined($self->get_conf('TOP_NODE_FILE_TARGET'))) {
         return $file . $self->get_conf('TOP_NODE_FILE_TARGET');
       } else {
-        return $file;# . '#Top';
+        return $file;
       }
     } else {
       return $file . '#Top';



reply via email to

[Prev in Thread] Current Thread [Next in Thread]