[src/trunk]: src/share/tmac Make .Nm without arguments, but with punctuation, ...

[wiz <wiz%NetBSD.org@localhost>]

details:   https://anonhg.NetBSD.org/src/rev/ca49d7f1c2d7
branches:  trunk
changeset: 543442:ca49d7f1c2d7
user:      wiz <wiz%NetBSD.org@localhost>
date:      Tue Feb 25 10:08:44 2003 +0000

description:
Make .Nm without arguments, but with punctuation, work.
Patch from Christian Limpach (chris at pin lu) on tech-userlevel.

diffstat:

 share/tmac/doc |  49 ++++++++++++++++++++++++++++++++++++-------------
 1 files changed, 36 insertions(+), 13 deletions(-)

diffs (66 lines):

diff -r a0de6b8655e4 -r ca49d7f1c2d7 share/tmac/doc
--- a/share/tmac/doc    Tue Feb 25 09:56:15 2003 +0000
+++ b/share/tmac/doc    Tue Feb 25 10:08:44 2003 +0000
@@ -1,4 +1,4 @@
-.\"    $NetBSD: doc,v 1.27 2003/01/21 15:40:02 wiz Exp $
+.\"    $NetBSD: doc,v 1.28 2003/02/25 10:08:44 wiz Exp $
 .\"
 .\" Copyright (c) 1991, 1993
 .\"    The Regents of the University of California.  All rights reserved.
@@ -788,21 +788,44 @@
 .if \\n(aC==0 \{\
 .      ie \\n(.$==0 \{\
 .              ie "\\*(n1"" .tm Usage: .Nm Name(s) ... \\*(Pu (#\\n(.c)
-.              el \&\\*(nM\\*(n1\fP\s0
+.              el \{\
+.                      ds mN Nm
+.                      ds A1 \\*(n1
+.                      nr fV 1
+.                      fV
+.              \}
 .      \}
 .      el \{\
 .              ds mN Nm
-.              ie "\\$1"" .ds A1 \\*(n1
-.              el .ds A1 \\$1
-.              ds A2 \\$2
-.              ds A3 \\$3
-.              ds A4 \\$4
-.              ds A5 \\$5
-.              ds A6 \\$6
-.              ds A7 \\$7
-.              ds A8 \\$8
-.              ds A9 \\$9
-.              nr fV \\n(.$
+.              sW "\\$1"
+.              aT \\$1
+.              ie \\n(aT==3:\\n(aT==4 \{\
+.                      ds A1 \\*(n1
+.                      ds A2 \\$1
+.                      ds A3 \\$2
+.                      ds A4 \\$3
+.                      ds A5 \\$4
+.                      ds A6 \\$5
+.                      ds A7 \\$6
+.                      ds A8 \\$7
+.                      ds A9 \\$8
+.                      if !"\\$9"" .as A9 " \\$9
+.                      nr fV \\n(.$
+.                      if \\n(fV<9 .nr fV \\n(fV+1
+.              \}
+.              el \{\
+.                      ie "\\$1"" .ds A1 \\*(n1
+.                      el .ds A1 \\$1
+.                      ds A2 \\$2
+.                      ds A3 \\$3
+.                      ds A4 \\$4
+.                      ds A5 \\$5
+.                      ds A6 \\$6
+.                      ds A7 \\$7
+.                      ds A8 \\$8
+.                      ds A9 \\$9
+.                      nr fV \\n(.$
+.              \}
 .              fV
 .      \}
 .\}