From 97f12442e6aafba1159ce9536fc7401c414ed6cf Mon Sep 17 00:00:00 2001 From: wl Date: Sat, 27 May 2006 14:48:21 +0000 Subject: * tmac/an-old.tmac (an-do-tag): Simplify. --- tmac/an-old.tmac | 20 +++++++------------- 1 file changed, 7 insertions(+), 13 deletions(-) (limited to 'tmac/an-old.tmac') diff --git a/tmac/an-old.tmac b/tmac/an-old.tmac index d187eba4..904e60ef 100644 --- a/tmac/an-old.tmac +++ b/tmac/an-old.tmac @@ -419,27 +419,21 @@ . ll . \" We must emit the diversion in a separate environment to . \" assure that a possible margin character is printed correctly. +. ev an-2 +. evc 0 +. mc +. nf +. in \\n[an-margin]u . ie (\\n[dl] + \\n[an-tag-sep] > \\n[an-prevailing-indent]) \{\ -. ev an-2 -. evc 0 -. mc -. nf -. in \\n[an-margin]u . ne (2v + 1u) . an-div . ev . in (\\n[an-margin]u + \\n[an-prevailing-indent]u) . \} . el \{\ -. \" In nroff mode, if the indentation value is not an integer multiple -. \" of the character cell, it is possible that the following combination -. \" of .in and .ti yields a different result as the .in request in +. \" In nroff mode, the indentation value should be an integer multiple +. \" of the character cell, to avoid different results compared to the . \" the .ie part above. -. ev an-2 -. evc 0 -. mc -. nf -. in \\n[an-margin]u . ne (1v + 1u) . DEVTAG-COL 1 . an-div -- cgit v1.2.1