From ba35c4a4941639c12b09cd92b01df28df1936b4f Mon Sep 17 00:00:00 2001
From: wlemb <wlemb>
Date: Fri, 16 Nov 2001 20:03:41 +0000
Subject: * NEWS, man/groff_differences.man, doc/groff.texinfo: Updated. *
 man/Makefile.sub: Include groff_differences.man. * VERSION: Set to 1.18. *
 REVISION: Set to 0. * src/roff/troff/input.cc (do_define_macro): Allow
 whitespace before the second dot (or ending macro name) to end a macro. *
 doc/groff.texinfo: Doc fix. * tmac/doc-common (doc-header): Handle very long
 document titles better. * tmac/doc.tmac (doc-do-Bl-args): Fix .substring
 requests.

---
 tmac/doc-common | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'tmac/doc-common')

diff --git a/tmac/doc-common b/tmac/doc-common
index 9e1a81a2..5730ce65 100644
--- a/tmac/doc-common
+++ b/tmac/doc-common
@@ -522,12 +522,25 @@
 .
 .\" NS doc-header macro
 .\" NS   print page header
+.\" NS
+.\" NS local variables:
+.\" NS   doc-reg-dh
+.\" NS   doc-reg-dh1
 .
 .de doc-header
 .  ev doc-env-dh
 .  doc-setup-page-layout
 .  if !\n[cR] \
 '    sp \n[doc-header-space]u
+.  nr doc-reg-dh \w'\*[doc-caption-font]\*[doc-header-string]\f[P]'
+.  nr doc-reg-dh1 \w'\*[doc-caption-font2]\*[doc-volume]\f[P]'
+.  if (\n[doc-reg-dh] + \n[doc-reg-dh1] + \n[doc-reg-dh] >= \n[.lt]) \{\
+.    while (\n[doc-reg-dh] + \n[doc-reg-dh1] + \n[doc-reg-dh] >= \n[.lt]) \{\
+.      substring doc-header-string 1 -1
+.      nr doc-reg-dh \w'\*[doc-caption-font]\*[doc-header-string]\|.\|.\|.\f[P]'
+.    \}
+.    as doc-header-string "\|.\|.\|.
+.  \}
 .  tl \*[doc-caption-font]\*[doc-header-string]\f[P]\*[doc-caption-font2]\*[doc-volume]\f[P]\*[doc-caption-font]\*[doc-header-string]\f[P]
 '  sp \n[doc-header-space]u
 .  ev
-- 
cgit v1.2.1