[no subject]

[Patrice Dumas]

branch: master
commit 8c70c252aae89f2b302384c2eaafd0bc3f33db7f
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Tue Nov 8 23:19:36 2022 +0100

    * tp/Texinfo/Report.pm (line_warn, document_warn), tp/texi2any.pl
    (document_warn): remove \n from translated string marked for
    translation with __p.
---
 ChangeLog            | 6 ++++++
 tp/Texinfo/Report.pm | 8 ++++----
 tp/texi2any.pl       | 2 +-
 3 files changed, 11 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 8028a4fc5b..ca140bd341 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2022-11-08  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/Texinfo/Report.pm (line_warn, document_warn), tp/texi2any.pl
+       (document_warn): remove \n from translated string marked for
+       translation with __p.
+
 2022-11-08  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/Convert/IXIN.pm, tp/Texinfo/Convert/TexinfoMarkup.pm,
diff --git a/tp/Texinfo/Report.pm b/tp/Texinfo/Report.pm
index 076a3bf01b..dfba67e469 100644
--- a/tp/Texinfo/Report.pm
+++ b/tp/Texinfo/Report.pm
@@ -83,11 +83,11 @@ sub line_warn($$$$)
   if (defined($error_location_info->{'macro'})
       and $error_location_info->{'macro'} ne '') {
     $warn_line = sprintf(__p("Texinfo source file warning",
-                             "warning: %s (possibly involving \@%s)\n"),
+                             "warning: %s (possibly involving \@%s)")."\n",
                          $text, $error_location_info->{'macro'});
   } else {
     $warn_line = sprintf(__p("Texinfo source file warning",
-                             "warning: %s\n"),
+                             "warning: %s")."\n",
                          $text);
   }
   warn $warn_line if (defined($configuration_information)
@@ -137,10 +137,10 @@ sub document_warn($$$)
   if (defined($configuration_information)
       and defined($configuration_information->get_conf('PROGRAM'))
       and $configuration_information->get_conf('PROGRAM') ne '') {
-    $warn_line = sprintf(__p("whole document warning", "%s: warning: %s\n"),
+    $warn_line = sprintf(__p("whole document warning", "%s: warning: %s")."\n",
                   $configuration_information->get_conf('PROGRAM'), $text);
   } else {
-    $warn_line = sprintf(__p("whole document warning", "warning: %s\n"),
+    $warn_line = sprintf(__p("whole document warning", "warning: %s")."\n",
                          $text);
   }
   push @{$self->{'errors_warnings'}},
diff --git a/tp/texi2any.pl b/tp/texi2any.pl
index 5ab688d74a..4c95e54074 100755
--- a/tp/texi2any.pl
+++ b/tp/texi2any.pl
@@ -412,7 +412,7 @@ sub document_warn($) {
   chomp ($text);
   warn(_encode_message(
        sprintf(__p("program name: warning: warning_message", 
-                   "%s: warning: %s\n"), $real_command_name, $text)));
+                   "%s: warning: %s")."\n", $real_command_name, $text)));
 }
 
 sub _decode_input($)