[bug #51608] [PATCH] om.tmac-u: Fix some mistakes, fix one bug

[Bjarni Ingi Gislason]

URL:
  <http://savannah.gnu.org/bugs/?51608>

                 Summary: [PATCH] om.tmac-u: Fix some mistakes, fix one bug
                 Project: GNU troff
            Submitted by: bjarniig
            Submitted on: Fri 28 Jul 2017 09:38:08 PM UTC
                Severity: 3 - Normal
              Item Group: None
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open
         Discussion Lock: Any
         Planned Release: None

    _______________________________________________________

Details:


>From 23a25549fcf88bfae6af80f57e96bfd0ef8899e8 Mon Sep 17 00:00:00 2001
From: Bjarni Ingi Gislason <address@hidden>
Date: Fri, 28 Jul 2017 21:33:48 +0000
Subject: [PATCH] om.tmac-u: Fix some mistakes, fix one bug

  Fix some spelling

  Define undefined macros and registers

  Fix the spelling of register "\\*[label-type]*label-suffx-set"

Signed-off-by: Bjarni Ingi Gislason <address@hidden>
---
 contrib/mom/om.tmac-u | 77
++++++++++++++++++++++++++++++++++++++-------------
 1 file changed, 58 insertions(+), 19 deletions(-)

diff --git a/contrib/mom/om.tmac-u b/contrib/mom/om.tmac-u
index c20510e9..c34ea5c1 100644
--- a/contrib/mom/om.tmac-u
+++ b/contrib/mom/om.tmac-u
@@ -161,7 +161,7 @@ extensions, and float management).
 .sty \n[.fp] UBLI    \"  Ultra Black Italic
 .sty \n[.fp] UBLCD   \"  Ultra Black Condensed
 .sty \n[.fp] UBLCDI  \"  Ultra Black Condensed Italic
-.sty \n[.fp] UBLEX   \"  Ultra Black Exteneded
+.sty \n[.fp] UBLEX   \"  Ultra Black Extended
 .sty \n[.fp] UBLEXI  \"  Ultra Black Extended Italic
 \#
 .sty \n[.fp] SC      \"  Small Caps Roman
@@ -222,6 +222,9 @@ end
 .ds PDFHREF.TEXTCOL.DEFAULT 0.0 0.3 0.9
 .nr PDFHREF.VIEW.LEADING.C 3i
 .nr PDFHREF.VIEW.LEADING.T 1i
+.if !r PDFHREF.VIEW.LEADING \{\
+.    nr PDFHREF.VIEW.LEADING 0
+.\}
 .nr PDFHREF.VIEW.LEADING.H \n[PDFHREF.VIEW.LEADING]
 \#
 \# ====================================================================
@@ -265,6 +268,42 @@ end
 .nr #L_MARGIN \n[.o]  \" Tabs, etc require #L_MARGIN
 .cflags 4 /\[en]      \" So slash and en-dashes get broken
 \#
+\# DEFINE UNDEFINED MACROS AND REGISTERS
+\#
+.if !d AUTO_RELOCATE_TOC \{\
+.    de AUTO_RELOCATE_TOC
+.    .
+.\}
+.
+.if !d BREAK_QUOTE \{\
+.    de BREAK_QUOTE
+.    .
+.\}
+.
+.if !d END \{\
+.    de END
+.    .
+.\}
+.
+.if !d INDENT_REFS \{\
+.    de INDENT_REFS
+.    .
+.\}
+.
+.if !d PDF_LINK_COLOR \{\
+.    de PDF_LINK_COLOR
+.    .
+.\}
+.
+.if !d pdfview \{\
+.    de pdfview
+.    .
+.\}
+.
+.if !r #EN_Q_AUTOLEAD \{\
+.    nr #EN_Q_AUTOLEAD 0
+.\}
+\#
 \# ====================================================================
 \#
 \# +++PAGE LAYOUT+++
@@ -1734,7 +1773,7 @@ end
 \# *Argument:
 \#   <none>
 \# *Function:
-\#   Automagically moves to TAB<n+1> on the same line as the last
+\#   Automatically moves to TAB<n+1> on the same line as the last
 \#   line of the previous tab.
 \# *Notes:
 \#   The \c inline must be appended to the end of input lines when in
@@ -2376,7 +2415,7 @@ end
 \#
 \# PAD
 \# ---
-\# *Argments:
+\# *Arguments:
 \#   "<string of text with padding markers inserted>"
 \#   "<id of bookmark created by .PDF_BOOKMARK>"
 \# *Function:
@@ -3686,7 +3725,7 @@ end
 \#   a trap (when they break the preceding line, they spring the
 \#   trap, and groff won't back up to the line preceding the trap).
 \#   TRAP is a kludge to get EL and TN work properly on last lines.
-\#   The user simply enloses the offending lines in TRAP OFF/TRAP.
+\#   The user simply encloses the offending lines in TRAP OFF/TRAP.
 \#
 .MAC TRAP END
 .    ie '\\$1'' .vpt
@@ -4283,7 +4322,7 @@ y\R'#DESCENDER \\n[.cdp]'
 \#   Instructs TYPEWRITE to treat italics as italics, whether
 \#   invoked via control lines or inline.
 \# *Notes:
-\#   ITALIC_MEANS_ITALIC and UNDERLINE_ITALIC are mututally exclusive,
+\#   ITALIC_MEANS_ITALIC and UNDERLINE_ITALIC are mutually exclusive,
 \#   hence invoking the one automatically turns off the other.
 \#
 .MAC ITALIC_MEANS_ITALIC END
@@ -4307,7 +4346,7 @@ y\R'#DESCENDER \\n[.cdp]'
 \#   Instructs TYPEWRITE to underline italics, whether invoked
 \#   via control lines or inline.
 \# *Notes:
-\#   UNDERLINE_ITALIC and ITALIC_MEANS_ITALIC are mututally exclusive,
+\#   UNDERLINE_ITALIC and ITALIC_MEANS_ITALIC are mutually exclusive,
 \#   hence invoking the one automatically turns off the other.
 \#
 \#   UNDERLINE_ITALIC is the default for TYPEWRITE.
@@ -4338,7 +4377,7 @@ y\R'#DESCENDER \\n[.cdp]'
 \#   italic but didn't have it, ergo the need to tell TYPEWRITE to
 \#   treat \*[SLANT] as italic (i.e. underlined).
 \#
-\#   UNDERLINE_SLANT and SLANT_MEANS_SLANT are mututally exclusive,
+\#   UNDERLINE_SLANT and SLANT_MEANS_SLANT are mutually exclusive,
 \#   hence invoking the one automatically turns off the other.
 \#
 \#   UNDERLINE_SLANT is the default for TYPEWRITE.
@@ -7557,7 +7596,7 @@ $\\*[DOC_]COVERTITLE_\\n+[#\\*[DOC_]COVERTITLE_NUM]
\\$\\n[#\\*[DOC_]COVERTITLE_
 \# *Arguments:
 \#   <none>
 \# *Function:
-\#   Macro to start document processiong.  Reads in default document
+\#   Macro to start document processing.  Reads in default document
 \#   style parameters and any parameters the user has changed before
 \#   issuing START.  Using the information gathered in the opening
 \#   macros, prints appropriate title (or chapter #), subtitle,
@@ -8886,7 +8925,7 @@ Shimming must be disabled with NO_SHIM before using
FLEX.
 \#
 \#   If the user wants to incorporate the page number into the string,
 \#   \*[PAGE#] must be used.  For example, if the user wants to put
-\#   an elipsis before the page number in the string, s/he should use
+\#   an ellipsis before the page number in the string, s/he should use
 \#   ...\*[PAGE#], not ...#
 \#
 .MAC HDRFTR_LEFT END
@@ -8958,7 +8997,7 @@ Shimming must be disabled with NO_SHIM before using
FLEX.
 \#
 \#   If the user wants to incorporate the page number into the string,
 \#   \*[PAGE#] must be used.  For example, if the user wants to put
-\#   an elipsis before the page number in the string, s/he should use
+\#   an ellipsis before the page number in the string, s/he should use
 \#   ...\*[PAGE#], not ...#
 \#
 .MAC HDRFTR_CENTER END
@@ -9048,7 +9087,7 @@ Shimming must be disabled with NO_SHIM before using
FLEX.
 \#
 \#   If the user wants to incorporate the page number into the string,
 \#   \*[PAGE#] must be used.  For example, if the user wants to put
-\#   an elipsis before the page number in the string, s/he should use
+\#   an ellipsis before the page number in the string, s/he should use
 \#   ...\*[PAGE#], not ...#
 \#
 .MAC HDRFTR_RIGHT END
@@ -9764,7 +9803,7 @@ Shimming must be disabled with NO_SHIM before using
FLEX.
 .    \}
 .    if \\n[#PRINT_STYLE]=1 \{\
 .       if \\n[#ENDNOTES]=1 \{\
-.\" Single-spaced endotes have a different lead
+.\" Single-spaced endnotes have a different lead
 .          if \\n[#EN_SINGLESPACE] \{\
 .             nr #RESTORE_DOC_LEAD \\n[#DOC_LEAD]
 .             nr #DOC_LEAD \\n[#EN_LEAD]u
@@ -11260,7 +11299,7 @@ Shimming must be disabled with NO_SHIM before using
FLEX.
 \#   [character] [iterations] [vertical adjustment]
 \# *Function:
 \#   Allows user to specify a line break character and the number
-\#   of times to repeat it horiontally.
+\#   of times to repeat it horizontally.
 \# *Notes:
 \#   Without an argument, LINEBREAK_CHAR will deposit a blank line.
 \#
@@ -13963,7 +14002,7 @@ E\\R'#CAP_HEIGHT \\n[.cht]'
 .
 .ALIAS ENDNOTE_STRING ENDNOTES_HEADER_STRING
 \#
-\# ENDNOTE STRING START POSTION
+\# ENDNOTE STRING START POSITION
 \# ----------------------------
 \# *Argument:
 \#   <distance from page top>
@@ -14884,8 +14923,8 @@ E\\R'#CAP_HEIGHT \\n[.cht]'
 \#   Sets #BIB_LIST to 1 for numbered list style, 0 for plain output
 \# *Notes:
 \#   Technically, user is supposed to enter PLAIN if s/he wants an
-\#   unumbered bibliography, but the el clause says "any arg but
-\#   LIST means unumbered."  Effectively, any arg but LIST produces
+\#   unnumbered bibliography, but the el clause says "any arg but
+\#   LIST means unnumbered."  Effectively, any arg but LIST produces
 \#   a "plain" bibliographic list.
 \#
 \# The 2nd and 3rd args have the same options as the 2nd and 3rd
@@ -18863,7 +18902,7 @@ E\\R'#CAP_HEIGHT \\n[.cht]'
 .    if \\n[#NUM_ARGS]=1 \{\
 .       rr \\*[label-type]*autolabel
 .       rr \\*[label-type]*label-prfx-set
-.       rr \\*[label-type]*label-suffx-set
+.       rr \\*[label-type]*label-sffx-set
 .    \}
 .    rr \\*[label-type]-label-args
 .END
@@ -21337,7 +21376,7 @@ does not fit on page \\n[pgnum]\\*[col-num].
 .while !'\\*[eval*[E]',' \{\
 .   ds eval*[E \\*([E
 .   substring eval*[E \\n+[position] \\n[position]
-.   if \\n+[counter]>30 .break \" 30 is abitrary
+.   if \\n+[counter]>30 .break \" 30 is arbitrary
 .\}
 .\" Check for " and"
 .if '\\*[eval*[E]',' \{\
@@ -21598,7 +21637,7 @@ does not fit on page \\n[pgnum]\\*[col-num].
 \#
 \# Book reprints
 \# -------------
-\# %d date of publication (the orignal date of publication)
+\# %d date of publication (the original date of publication)
 .de ref*add-d
 .ie '\\*[$REF_STYLE]'NOTE' \{\
 .   ref*field d "" ( ;
-- 
2.13.2






    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?51608>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/