[groff] 04/23: [hdtbl]: Fix kludge in font dumping examples.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit a7f1fb53fef524da5b3a897f9de389dcab21b9c8
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Tue Nov 19 21:43:05 2024 -0600

    [hdtbl]: Fix kludge in font dumping examples.
    
    * contrib/hdtbl/examples/fonts_n.in (fontdump):
    * contrib/hdtbl/examples/fonts_x.in (fontdump): Put back the newline at
      the end of the pipe stream constructed by `pso` request; the tr(1)
      command in the pipeline was eliding it along with the intended
      transformation of control characters.  Our Texinfo manual notes this
      pitfall.
---
 contrib/hdtbl/ChangeLog           | 9 +++++++++
 contrib/hdtbl/examples/fonts_n.in | 4 ++--
 contrib/hdtbl/examples/fonts_x.in | 4 ++--
 3 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/contrib/hdtbl/ChangeLog b/contrib/hdtbl/ChangeLog
index d6c01dc5b..6500e8641 100644
--- a/contrib/hdtbl/ChangeLog
+++ b/contrib/hdtbl/ChangeLog
@@ -1,3 +1,12 @@
+2024-11-21  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * examples/fonts_n.in (fontdump):
+       * examples/fonts_x.in (fontdump): Put back the newline at the
+       end of the pipe stream constructed by `pso` request; the tr(1)
+       command in the pipeline was eliding it along with the intended
+       transformation of control characters.  Our Texinfo manual notes
+       this pitfall.
+
 2024-11-10  Robert Yang <liezhi.yang@windriver.com>
 
        * hdtbl.am (HDTBLPROCESSEDEXAMPLEFILES): Declare dependency on
diff --git a/contrib/hdtbl/examples/fonts_n.in 
b/contrib/hdtbl/examples/fonts_n.in
index c953fa461..440ac7497 100644
--- a/contrib/hdtbl/examples/fonts_n.in
+++ b/contrib/hdtbl/examples/fonts_n.in
@@ -54,8 +54,8 @@ along with this program.  If not, see 
<http://www.gnu.org/licenses/>.
 .  pso sh -c \
        "printf '%s' '.ds *f ' ; \
         ls \\*[fontpath]/dev\*[.T] \
-        | tr '[:cntrl:]' '[ *]'"
-.  \"  This dummy line is necessary; the preceding line eats it.
+        | tr '[:cntrl:]' '[ *]'; \
+        echo"
 .
 .  while !"\\*[*args]"" \{\
 .    pops *$1 *args
diff --git a/contrib/hdtbl/examples/fonts_x.in 
b/contrib/hdtbl/examples/fonts_x.in
index c183c7c8e..7b4ba1347 100644
--- a/contrib/hdtbl/examples/fonts_x.in
+++ b/contrib/hdtbl/examples/fonts_x.in
@@ -54,8 +54,8 @@ along with this program.  If not, see 
<http://www.gnu.org/licenses/>.
 .  pso sh -c \
        "printf '%s' '.ds *f ' ; \
         ls \\*[fontpath]/dev\*[.T] \
-        | tr '[:cntrl:]' '[ *]'"
-.  \"  This dummy line is necessary; the preceding line eats it.
+        | tr '[:cntrl:]' '[ *]'; \
+        echo"
 .
 .  while !"\\*[*args]"" \{\
 .    pops *$1 *args