branch master updated: * tp/t/test_utils.pl (output_texi_file): always add a newline in the end of the test Texinfo code.

[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 215f529033 * tp/t/test_utils.pl (output_texi_file): always add a 
newline in the end of the test Texinfo code.
215f529033 is described below

commit 215f529033abd43760b877a096e6f517bf699dd5
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Tue Nov 29 23:39:28 2022 +0100

    * tp/t/test_utils.pl (output_texi_file): always add a newline in the
    end of the test Texinfo code.
---
 ChangeLog          | 5 +++++
 tp/t/test_utils.pl | 5 ++++-
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 11ad5fa68a..21ea986ef9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -9,6 +9,11 @@
        * js/info.css (.tex-input): Make input element a bit wider.
        This works better for longer index or menu names.
 
+2022-11-29  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/t/test_utils.pl (output_texi_file): always add a newline in the
+       end of the test Texinfo code.
+
 2022-11-29  Patrice Dumas  <pertusus@free.fr>
 
        * util/txixml2texi.pl: avoid double comment for line specific command.
diff --git a/tp/t/test_utils.pl b/tp/t/test_utils.pl
index f1a28bf4c5..09dc6bbabf 100644
--- a/tp/t/test_utils.pl
+++ b/tp/t/test_utils.pl
@@ -1680,7 +1680,10 @@ sub output_texi_file($)
   # a test string from a *.t file code, it is a perl character string
   # and is encoded here, to UTF-8 as it is the default Texinfo encoding.
   $test_text = Encode::encode('UTF-8', $test_text) if ($encode);
-  print OUTFILE $test_text;
+  # Always add a newline in the end.  There may not be a newline for tests
+  # defined as strings ending right after a character.
+  chomp($test_text);
+  print OUTFILE $test_text."\n";
   print OUTFILE "$bye\n" if ($bye ne '');
   close (OUTFILE) or die "Close $file: $!\n";
 }