branch master updated: * tp/maintain/generate_convert_data_perl_code.pl: use generating file basename in comment.

[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 4a28391c78 * tp/maintain/generate_convert_data_perl_code.pl: use 
generating file basename in comment.
4a28391c78 is described below

commit 4a28391c78172f75b8aab366bc10033b0a3a035f
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Tue Oct 1 21:26:39 2024 +0200

    * tp/maintain/generate_convert_data_perl_code.pl: use generating file
    basename in comment.
---
 ChangeLog                                      | 11 ++++++++---
 tp/maintain/generate_convert_data_perl_code.pl |  4 +++-
 2 files changed, 11 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 9bfe56d8a9..b2dea4dfe0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,13 +1,18 @@
 2024-10-01  Patrice Dumas  <pertusus@free.fr>
 
-       * tp/Texinfo/XS/gnulib/lib/Makefile.am,
-       tp/Texinfo/XS/gnulib/m4/gnulib-cache.m4,
-       tp/Texinfo/XS/gnulib/po/POTFILES.in: update tp/Texinfo/XS gnulib.
+       * tp/maintain/generate_convert_data_perl_code.pl: use generating file
+       basename in comment.
 
 2024-07-28  Patrice Dumas  <pertusus@free.fr>
 
        * gnulib/m4: remove obsolete gnulib gettext module m4 files.
 
+2024-10-01  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/XS/gnulib/lib/Makefile.am,
+       tp/Texinfo/XS/gnulib/m4/gnulib-cache.m4,
+       tp/Texinfo/XS/gnulib/po/POTFILES.in: update tp/Texinfo/XS gnulib.
+
 2024-07-28  Patrice Dumas  <pertusus@free.fr>
 
        Setup separate po files directory for tp/Texinfo/XS directory gnulib
diff --git a/tp/maintain/generate_convert_data_perl_code.pl 
b/tp/maintain/generate_convert_data_perl_code.pl
index 286b50d6fb..f015f04403 100755
--- a/tp/maintain/generate_convert_data_perl_code.pl
+++ b/tp/maintain/generate_convert_data_perl_code.pl
@@ -26,6 +26,8 @@ use warnings;
 
 use Text::Wrap;
 
+my $program_name = basename($0);
+
 my $base_default_css_element_class_styles_file = $ARGV[0];
 
 open (BDCSS, "<$base_default_css_element_class_styles_file") 
@@ -71,7 +73,7 @@ die "Need an output file\n" if (!defined($out_file));
 
 open(OUT, ">$out_file") or die "Open $out_file: $!\n";
     
-print OUT "# Automatically generated from $0\n\n";
+print OUT "# Automatically generated from $program_name\n\n";
 
 print OUT "package Texinfo::Data;\n\n";