diff options
-rw-r--r-- | ChangeLog | 11 | ||||
-rw-r--r-- | tmac/an-old.tmac | 11 |
2 files changed, 21 insertions, 1 deletions
@@ -1,5 +1,16 @@ 2021-05-06 G. Branden Robinson <g.branden.robinson@gmail.com> + If \*[HF] is a bold style, substitute bold italics for italics + in section and subsection headings, keeping the font weight + consistent. + + * tmac/an-old.tmac (initialization): Set a flag for this based + on the interpolation of \*[HF] matching "B" as its last + character. + (SH, SS): Apply and reverse font remapping based on this flag. + +2021-05-06 G. Branden Robinson <g.branden.robinson@gmail.com> + * tmac/an-ext.tmac (EX): Work around Savannah #59522 by changing fonts differently on DVI output, avoiding a font warning. diff --git a/tmac/an-old.tmac b/tmac/an-old.tmac index ad1314716..e6594b574 100644 --- a/tmac/an-old.tmac +++ b/tmac/an-old.tmac @@ -1,6 +1,6 @@ .\" an-old.tmac .\" -.\" Copyright (C) 1989-2020 Free Software Foundation, Inc. +.\" Copyright (C) 1989-2021 Free Software Foundation, Inc. .\" Written by James Clark (jjc@jclark.com) .\" .\" This file is part of groff. @@ -323,12 +323,14 @@ . nr an-break-flag 1 . ps \\n[PS-SH]u . ft \\*[HF] +. if \\n[an-HF-remap-I-style] .ftr I BI . ne (2v + 1u) . if \\n[.$] \{\ . ds an-section-heading \\$*\" . if \\n[CS] .stringup an-section-heading \&\\*[an-section-heading] . \} +. if \\n[an-HF-remap-I-style] .ftr I I .. . .de1 SS @@ -344,8 +346,10 @@ . nr an-break-flag 1 . ps \\n[PS-SS]u . ft \\*[HF] +. if \\n[an-HF-remap-I-style] .ftr I BI . ne (2v + 1u) . if \\n[.$] \&\\$* +. if \\n[an-HF-remap-I-style] .ftr I I .. . .de1 B @@ -826,6 +830,11 @@ .if !d HF \ . ds HF B\" . +.\" If HF is a bold style, use bold italics for italics in headings. +.ds an-heading-style \*[HF] +.substring an-heading-style -1 -1 +.if '\*[an-heading-style]'B' .nr an-HF-remap-I-style 1 +. .if \n[cR] \ . an-set-up-continuous-rendering . |