diff options
| author | wl <wl> | 2004-10-13 07:24:45 +0000 |
|---|---|---|
| committer | wl <wl> | 2004-10-13 07:24:45 +0000 |
| commit | 6830c4ce4f03f5ffc462c538e6968337c210ee29 (patch) | |
| tree | 6e0a09f31a9e671ca4c36eb2402bb1634faef2b9 /tmac/an-old.tmac | |
| parent | a42979ea6d9e4adf68a62057fc276b01b0fe9f0c (diff) | |
| download | groff-6830c4ce4f03f5ffc462c538e6968337c210ee29.tar.gz | |
* doc/groff.css: New file.
* doc/webpage.ms: Use `groff.css'.
Other small fixes.
* tmac/an-old.tmac (need_eo_h): New number register.
(TH): Emit `.eo.tl' tag after title.
(SH): Set `need_eo_h'.
(an-trap): Handle `need_eo_h'.
(an-do-tag): s/HTML-TAG-NS/HTML-TAG-NEXT/.
* tmac/s.tmac (need_eo_h, need_eo_tl): New number registers.
(TL): Always start diversion.
Updated.
(@AI): Always call `par@reset'.
(@AB): Update code for -Thtml.
(cov*tl-au-print): Handle -Thtml.
(par@reset): Handle `need_eo_tl', `need_eo_h'.
(@IP): Simplified.
(@IT-html): Removed.
(@SH): Set `need_eo_h' for -Thtml.
(par@TL): s/HTML-TAG/HTMl-TAG-NS/.
Set `need_eo_tl'.
(@NH): s/HTML-TAG/HTMl-TAG-NS/.
Set `need_eo_h' for -Thtml.
(@EQ, @EN): Don't handle -Thtml specially.
(par@load-init): Don't handle -Thtml specially.
* tmac/www.tmac (www:paraspace): New macro.
(HTML-NS, HTML-TAG-NS): Use new `tag' request.
(HTML</p>, HTML-TAG-NEXT): New macros.
(HnE): Emit tag `.eo.h' instead of break.
(HR): s/HTML-NS/HTML/.
(www-end-nowhere): End diversion only if `www-html' not set.
Emit `.eo.tl' tag.
(ULS, ULE): s|HTML|HTML</p>|.
(LI): Call `www:paraspace'.
(HEAD): New macro.
Diffstat (limited to 'tmac/an-old.tmac')
| -rw-r--r-- | tmac/an-old.tmac | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/tmac/an-old.tmac b/tmac/an-old.tmac index 46bb3795..73d37e42 100644 --- a/tmac/an-old.tmac +++ b/tmac/an-old.tmac @@ -58,6 +58,8 @@ . el .nr cR 0 .\} . +.nr need_eo_h 0 +. .if !r LL \{\ . ie n .nr LL 78n . el .nr LL 6.5i @@ -109,6 +111,7 @@ . if \\n[an-html] \{\ . HTML-TAG-NS ".tl" \\$1 +. HTML-TAG-NS ".eo.tl" . \} . . de an-init \" We have to do it like this to get multiple man pages right. @@ -310,6 +313,7 @@ . fi . in \\n[an-margin]u . ti 0 +. nr need_eo_h 1 . HTML-TAG-NS ".NH \\n[an-level]" . it 1 an-trap . nr an-no-space-flag 1 @@ -373,6 +377,8 @@ .. . .de1 an-trap +. if \\n[need_eo_h]>0 .HTML-TAG-NS ".eo.h" +. nr need_eo_h 0 . ft R . ps \\n[PS]u . vs \\n[VS]u @@ -409,7 +415,7 @@ . ne (1v + 1u) . HTML-TAG-NS ".col 1" \\*[an-div]\\h'|\\n[an-prevailing-indent]u'\c -. HTML-TAG-NS ".col 2" +. HTML-TAG-NEXT ".col 2" . \} .. . |