[groff] 02/02: Fix .ss calls, move misplaced .na

[Peter Schaffter]

PTPi pushed a commit to branch master
in repository groff.

commit f44f573d2bbdf66355cc9e4d46d771c7d66a552f
Author: Peter Schaffter <peter@schaffter.ca>
AuthorDate: Thu Jan 21 13:09:59 2021 -0500

    Fix .ss calls, move misplaced .na
    
    Amend instances of (\n[.ss]-\n[.ss]) as 2nd arg to .ss to just "0".
    
    Move .na in macro EQ to correct position (i.e. after capturing \n[.j]).
---
 contrib/mom/om.tmac | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/contrib/mom/om.tmac b/contrib/mom/om.tmac
index ad9fcad..0cc2c87 100644
--- a/contrib/mom/om.tmac
+++ b/contrib/mom/om.tmac
@@ -20,7 +20,7 @@ for more details.
 You should have received a copy of the GNU General Public License
 along with this program. If not, see <http://www.gnu.org/licenses/>.
 
-Version 2.4-4_c
+Version 2.4-4_d
 ---------------
 Antoine de St-Exupéry asserted that elegance in engineering is
 achieved not when there is nothing left to add, but when there is
@@ -54,7 +54,7 @@ extensions, and float management).
 .if (\n[.x]\n[.y] < 118) \
 .   ab [mom]: You need GNU troff version 1.18 or higher to run this version of 
mom.
 \# Mom version
-.ds version 2.4-4_c
+.ds version 2.4-4_d
 .if dVERSION \{\
 .   ab [mom]: Version \*[version]
 .\}
@@ -1976,7 +1976,7 @@ end
 .    ds $SAVED_SS_VAR \\*[$SS_VAR]
 .    ie '\\$1'' \{\
 .       nr #UNDERLINE_ON 1
-.       ss \\n[.ss] (\\n[.ss]-\\n[.ss])
+.       ss \\n[.ss] 0
 .       ie !n .nop \X'ps: exec \\n[_w] \\n[_d] decorline'\c
 .       el .cu 1000
 .    \}
@@ -2001,7 +2001,7 @@ end
 .MAC UL END
 \c
 .    ds $SAVED_SS_VAR \\*[$SS_VAR]
-.    ss \\n[.ss] (\\n[.ss]-\\n[.ss])
+.    ss \\n[.ss] 0
 .    ie !'\\n[.z]'' \{\
 \c
 .       ie !n \{\
@@ -3326,7 +3326,7 @@ end
 \#
 .MAC SS END
 .    ds $SS_VAR \\$1
-.    ie '\\$1'0' .ss \\n[.ss] (\\n[.ss]-\\n[.ss])
+.    ie '\\$1'0' .ss \\n[.ss] 0
 .    el \{\
 .       ie '\\$1'DEFAULT' .ss \\n[.ss]
 .       el                .ss \\n[.ss] \\*[$SS_VAR]
@@ -20977,10 +20977,10 @@ does not fit on page \\n[pgnum]\\*[col-num].
 .       if !\\n[pgnum] .nr pgnum \\n%+\\n[#PAGE_NUM_ADJ]
 .       br
 .       if \\n[.u] .nr fill 1
-.       na
 .       rr float*eqn
 .       if '\\n[.z]'FLOAT*DIV' .nr float*eqn 1
 .       nr eqn*restore-adj \\n[.j]
+.       na
 .       if !\\n[continued] \{\
 .          PDF_TARGET eqn:\\n+[lists*target]
 .          rr eqn*type