Add support for optionally showing all trademark symbols, not just the

required symbols, by setting the make variable
WITH_ALL_TRADEMARK_SYMBOLS, to any non empty value.

This feature is mainly useful for document writers, to make sure all
trademarks are marked up correctly.
This commit is contained in:
Simon L. B. Nielsen 2003-09-14 13:11:43 +00:00
parent 2993ccd69a
commit 16d9a01672
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/head/; revision=18124
2 changed files with 14 additions and 3 deletions

View file

@ -213,6 +213,10 @@ HTMLFLAGS+= -V %generate-docformat-navi-link%
.elif (${FORMATS:Mhtml} == "html") && (${FORMATS:Mhtml-split} == "html-split")
HTMLFLAGS+= -V %generate-docformat-navi-link%
.endif
.if defined(WITH_ALL_TRADEMARK_SYMBOLS) && !empty(WITH_ALL_TRADEMARK_SYMBOLS)
HTMLFLAGS+= -V %show-all-trademark-symbols%
PRINTFLAGS+= -V %show-all-trademark-symbols%
.endif
PERL?= /usr/bin/perl
PKG_CREATE?= /usr/sbin/pkg_create

View file

@ -71,6 +71,11 @@
;; Create docformat navi link for HTML output?
#f)
(define %show-all-trademark-symbols%
;; Show all the trademark symbols, not just the required
;; symbols.
#f)
(define (book-titlepage-recto-elements)
(list (normalize "title")
(normalize "subtitle")
@ -1015,10 +1020,12 @@
(loop (node-list-rest nl) num)))))))
;; Determine if we should show a trademark symbol. Either in
;; first occurrence in the proper context, or if the role
;; attribute is set to force.
;; first occurrence in the proper context, if the role
;; attribute is set to force, or if %show-all-trademark-symbols%
;; is set to true.
(define (show-tm-symbol? trademark)
(or (= ($chunk-trademark-number$ trademark) 1)
(or %show-all-trademark-symbols%
(= ($chunk-trademark-number$ trademark) 1)
(equal? (attribute-string (normalize "role") trademark) "force")))
</style-specification-body>