groff-commit
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[groff] 06/10: tmac/an-old.tmac: Improve name space management.


From: G. Branden Robinson
Subject: [groff] 06/10: tmac/an-old.tmac: Improve name space management.
Date: Thu, 17 Sep 2020 05:20:29 -0400 (EDT)

gbranden pushed a commit to branch master
in repository groff.

commit 3f5c59eacf79c706507b0f3a5b26a00ba318137a
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Wed Sep 16 22:48:51 2020 +1000

    tmac/an-old.tmac: Improve name space management.
    
    Rename .ne request to .an-ne instead of outright clobbering it (and in
    parallel with .an-bp).  Rename 'an-ne' register to 'an-need' to prevent
    confusion with renamed request.
---
 ChangeLog        | 7 +++++++
 tmac/an-old.tmac | 9 +++++----
 2 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 5b5d8a5..6775439 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,12 @@
 2020-09-16  G. Branden Robinson <g.branden.robinson@gmail.com>
 
+       tmac/an-old.tmac: Improve name space management.  Rename .ne
+       request to .an-ne instead of outright clobbering it (and in
+       parallel with .an-bp).  Rename 'an-ne' register to 'an-need' to
+       prevent confusion with renamed request.
+
+2020-09-16  G. Branden Robinson <g.branden.robinson@gmail.com>
+
        tmac/an-old.tmac: Drop .ll hack for LL register.
 
        Drop the .ll hack for setting the line length on nroff devices.
diff --git a/tmac/an-old.tmac b/tmac/an-old.tmac
index 8bbba11..af5eaf3 100644
--- a/tmac/an-old.tmac
+++ b/tmac/an-old.tmac
@@ -68,13 +68,14 @@
 .\" Similarly, we redefine .bp if cR is set, adjusting the page length
 .\" to the current position so that no empty lines are inserted.
 .if \n[cR] \{\
+.  rn ne an-ne
 .  de1 ne
 .    ie \\n[.$] \
-.      nr an-ne (v;\\$*)
+.      nr an-need (v;\\$*)
 .    el \
-.      nr an-ne 1v
-.    if (\\n[an-ne] >= \\n[.t]) \
-.      pl +(\\n[an-ne]u - \\n[.t]u + 1v)
+.      nr an-need 1v
+.    if (\\n[an-need] >= \\n[.t]) \
+.      pl +(\\n[an-need]u - \\n[.t]u + 1v)
 .  .
 .
 .  rn bp an-bp



reply via email to

[Prev in Thread] Current Thread [Next in Thread]