[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[groff] 06/41: [man]: Recover faster from missing `EE` calls.
From: |
G. Branden Robinson |
Subject: |
[groff] 06/41: [man]: Recover faster from missing `EE` calls. |
Date: |
Fri, 18 Mar 2022 00:41:27 -0400 (EDT) |
gbranden pushed a commit to branch master
in repository groff.
commit e0e16d8e659e8ce9165dee7f91a066559c2c9a61
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Tue Mar 15 19:27:35 2022 +1100
[man]: Recover faster from missing `EE` calls.
* tmac/an.tmac: Recover more quickly from missing `EE` calls.
(initialization): Define new strings, `an*body-family` and
`an*example-family` to house the font families used in these rendering
contexts.
(TH, SH, SS): Restore the font family to `an*body-family`.
(TH): Set font style to roman as well.
(EX): Change to `an*example-family` instead of literal "C".
Fixes <https://savannah.gnu.org/bugs/?62187>.
---
ChangeLog | 12 ++++++++++++
tmac/an.tmac | 10 +++++++++-
2 files changed, 21 insertions(+), 1 deletion(-)
diff --git a/ChangeLog b/ChangeLog
index acb8860c..7510d12f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,15 @@
+2022-03-15 G. Branden Robinson <g.branden.robinson@gmail.com>
+
+ * tmac/an.tmac: Recover more quickly from missing `EE` calls.
+ (initialization): Define new strings, `an*body-family` and
+ `an*example-family` to house the font families used in these
+ rendering contexts.
+ (TH, SH, SS): Restore the font family to `an*body-family`.
+ (TH): Set font style to roman as well.
+ (EX): Change to `an*example-family` instead of literal "C".
+
+ Fixes <https://savannah.gnu.org/bugs/?62187>.
+
2022-03-15 G. Branden Robinson <g.branden.robinson@gmail.com>
* tmac/e.tmac: Test register for existence before using it to
diff --git a/tmac/an.tmac b/tmac/an.tmac
index 0e4aa6fa..71a0b6f0 100644
--- a/tmac/an.tmac
+++ b/tmac/an.tmac
@@ -223,6 +223,9 @@
. \" once when initializing the package because when rendering multiple
. \" pages, a previous page might have changed them.
.
+. fam \\*[an*body-family]
+. ft R
+.
. nr PS 10z \" default point size
. nr PS-SS 10z
. nr PS-SH 10.95z
@@ -628,6 +631,7 @@
.
.\" Set arguments (or next input line if none) as a section heading.
.de1 SH
+. fam \\*[an*body-family]
. an-break-paragraph
. an-reset-margin-and-inset-level
. fi
@@ -653,6 +657,7 @@
.
.\" Set arguments (or next input line if none) as a subsection heading.
.de1 SS
+. fam \\*[an*body-family]
. an-break-paragraph
. an-reset-margin-and-inset-level
. fi
@@ -961,7 +966,7 @@
. ftr I CWI
. ftr BI CWI
. \}
-. el .fam C
+. el .fam \\*[an*example-family]
. ft R
..
.
@@ -1106,6 +1111,9 @@
.nr an-is-output-html 0
.if '\*[.T]'html' .nr an-is-output-html 1
.
+.ds an*body-family T \" Times
+.ds an*example-family C \" Courier
+.
.\" Map monospaced fonts to standard styles for groff's nroff devices.
.if n \{\
. ftr CR R
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [groff] 06/41: [man]: Recover faster from missing `EE` calls.,
G. Branden Robinson <=