[groff] 13/41: [me]: Fix Savannah #62039.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit a8e062c2b2403f03dd5a79d0a0d7f845463f08d2
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Wed Mar 16 00:10:36 2022 +1100

    [me]: Fix Savannah #62039.
    
    * tmac/e.tmac (initialization): Define `@b` as empty if formatting for
      HTML, because no page breaks occur in that format.
    
    Fixes <https://savannah.gnu.org/bugs/?62039>.
---
 ChangeLog   | 8 ++++++++
 tmac/e.tmac | 3 ++-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index c842d8e3..fc072ed5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2022-03-15  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * tmac/e.tmac (initialization): Define `@b` as empty if
+       formatting for HTML, because no page breaks occur in that
+       format.
+
+       Fixes <https://savannah.gnu.org/bugs/?62039>.
+
 2022-03-15  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        * src/devices/grodvi/dvi.cpp (usage): Align usage message with
diff --git a/tmac/e.tmac b/tmac/e.tmac
index acf50926..605c3201 100644
--- a/tmac/e.tmac
+++ b/tmac/e.tmac
@@ -508,7 +508,8 @@
 .\"            *** COMMANDS WITH VARIANT DEFINITIONS ***
 .
 .
-.if !'\*(.T'html' .rn bp @b    \" --- begin page
+.ie '\*(.T'html' .ds @b \" empty
+.el              .rn bp @b     \" --- begin page
 .
 .de bp                 \" *** begin new page (overrides columns)
 .nr $c \\n($m                  \" force new page, not new column