summaryrefslogtreecommitdiff
path: root/contrib/mom/om.tmac
diff options
context:
space:
mode:
authorPTPi <PTPi>2012-02-21 21:14:19 +0000
committerPTPi <PTPi>2012-02-21 21:14:19 +0000
commit57b1f3fff43204b4d5b1653ed31173158fa6b2b6 (patch)
treea7ed8e79f4f8a41ef7d64ddd588b77e45560df5d /contrib/mom/om.tmac
parent1b1316787840e250551aa70fc0bb375db0d811dd (diff)
downloadgroff-57b1f3fff43204b4d5b1653ed31173158fa6b2b6.tar.gz
Small bugfixes, doc corrections, changes to TYPEWRITE for
DOCTYPE NAMED handling.
Diffstat (limited to 'contrib/mom/om.tmac')
-rw-r--r--contrib/mom/om.tmac11
1 files changed, 9 insertions, 2 deletions
diff --git a/contrib/mom/om.tmac b/contrib/mom/om.tmac
index 36fcd0d7..1cf7c9d9 100644
--- a/contrib/mom/om.tmac
+++ b/contrib/mom/om.tmac
@@ -2476,7 +2476,7 @@ end
. char \\*[$PAD_MARKER] \R'#SPACE_TO_END \En(.l-\Enp'\R'#PAD_SPACE \En[#SPACE_TO_END]/\En[#PAD_COUNT]'
. di PAD_STRING
. fam \\*[$FAMILY_FOR_PAD]
-\\f]\\*[$FONT_FOR_PAD]]\\s[\\n[#SIZE_FOR_PAD]u]\\*[$PAD_STRING]
+\\f[\\*[$FONT_FOR_PAD]]\\s[\\n[#SIZE_FOR_PAD]u]\\*[$PAD_STRING]
. br
. di
. char \\*[$PAD_MARKER] \h'\En[#PAD_SPACE]u'
@@ -5675,6 +5675,8 @@ y\\R'#DESCENDER \\n[.cdp]'
. SS DEFAULT
. if \\n[#UNDERLINE_QUOTES]=1 \{ .UNDERLINE_QUOTES \}
. if \\n[#UNDERLINE_QUOTES]=0 \{ .UNDERLINE_QUOTES OFF \}
+.\" +Doctype underlining (if NAMED)
+. if !r#DOCTYPE_UNDERLINE \{ .nr #DOCTYPE_UNDERLINE 1 \}
.\" +Quotes and blockquotes
. if !r#Q_OFFSET_VALUE \{\
. if '\\*[$Q_OFFSET_VALUE]'' \{ .QUOTE_INDENT 1 \}
@@ -7831,7 +7833,12 @@ y\\R'#DESCENDER \\n[.cdp]'
. \}
. ie \\n[#SINGLE_SPACE]=0 \{ .sp 2 \}
. el \{ .sp \}
-. UNDERSCORE2 4p "\\*[$DOC_TYPE]"
+. ie \\n[#DOCTYPE_UNDERLINE] \{\
+. UNDERSCORE2 4p "\\*[$DOC_TYPE]"
+. \}
+. el \{\
+. PRINT "\\*[$DOC_TYPE]"
+. \}
. if \\n[#SINGLE_SPACE]=1 \{ .sp \}
. \}
. if \\n[#PRINT_STYLE]=2 \{\