gbranden pushed a commit to branch master
in repository groff.
commit 51ff16774e65ab35b0a1fd1fc1711bd8e714fd73
Author: G. Branden Robinson <[email protected]>
AuthorDate: Sun Jun 30 00:13:36 2024 -0500
[mm]: Use typesetters' (R), SM, TM signs.
* contrib/mm/m.tmac (Rg, Sm, Tm): Favor registered sign, service mark
sign, and trade mark sign font glyphs on typesetters when present.
Annotate a limitation of this approach.
---
contrib/mm/ChangeLog | 6 ++++++
contrib/mm/m.tmac | 25 +++++++++++++++----------
2 files changed, 21 insertions(+), 10 deletions(-)
diff --git a/contrib/mm/ChangeLog b/contrib/mm/ChangeLog
index 7c8f1267d..925b258bb 100644
--- a/contrib/mm/ChangeLog
+++ b/contrib/mm/ChangeLog
@@ -1,3 +1,9 @@
+2024-06-29 G. Branden Robinson <[email protected]>
+
+ * m.tmac (Rg, Sm, Tm): Favor registered sign, service
+ mark sign, and trade mark sign font glyphs on typesetters when
+ present. Annotate a limitation of this approach.
+
2024-06-29 G. Branden Robinson <[email protected]>
* m.tmac (Sm, Tm): Tweak string definitions to use half-line
diff --git a/contrib/mm/m.tmac b/contrib/mm/m.tmac
index 01cab66ef..a499dcfc3 100644
--- a/contrib/mm/m.tmac
+++ b/contrib/mm/m.tmac
@@ -262,23 +262,28 @@ http://savannah.gnu.org/bugs/?group=groff.
.\" display indentation in ens
.nr Si 5
.\" registered (trade mark) string
-.\" This overstriken glyph looks okay with Times roman.
-.ie t .ds Rg \Z'\s-4\[email protected]@\[email protected]@R\s0'\s+4\[ci]\s0\"
+.\" TODO: Query only the selected font (\n[.fn]) for the applicable
+.\" glyphs; because these symbols are "letter-like", falling back to a
+.\" special font might result in serifed trademark signs with a sans
+.\" serif text font. We need a new GNU troff feature for that. See
+.\" Savannah #64004.
+.ie c \[u00AE] .ds Rg \[u00AE]\"
.el \{\
-. ie c \[u00AE] .ds Rg \[u00AE]\"
-. el .ds Rg \u(R)\d\"
+. \" This overstriken glyph looks okay with Times roman.
+. ie t .ds Rg \Z'\s-4\[email protected]@\[email protected]@R\s0'\s+4\[ci]\s0\"
+. el .ds Rg \u(R)\d\"
.\}
.\" service mark string
-.ie t .ds Sm \v'-.4m'\s-3SM\s0\v'.4m'\"
+.ie c \[u2120] .ds Sm \[u2120]\"
.el \{\
-. ie c \[u2120] .ds Sm \[u2120]\"
-. el .ds Sm \u(SM)\d\"
+. ie t .ds Sm \v'-.4m'\s-3SM\s0\v'.4m'\"
+. el .ds Sm \u(SM)\d\"
.\}
.\" trade mark string
-.ie t .ds Tm \v'-.4m'\s-3TM\s0\v'.4m'\"
+.ie c \[tm] .ds Tm \[tm]\"
.el \{\
-. ie c \[tm] .ds Tm \[tm]\"
-. el .ds Tm \u(TM)\d\"
+. ie t .ds Tm \v'-.4m'\s-3TM\s0\v'.4m'\"
+. el .ds Tm \u(TM)\d\"
.\}
.
.nr @in-verbatim-region 0
_______________________________________________
Groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit
