diff options
| author | wl <wl> | 2009-01-02 08:07:03 +0000 |
|---|---|---|
| committer | wl <wl> | 2009-01-02 08:07:03 +0000 |
| commit | 5541c427dc03de11c32bdceac89648ab7951fe6c (patch) | |
| tree | 27d6a49473a676fd1f9da17e3945b1d961aa7274 /tmac/ptx.tmac | |
| parent | 93471faa5a35039feba29fc48320d4932f2bc866 (diff) | |
| download | groff-5541c427dc03de11c32bdceac89648ab7951fe6c.tar.gz | |
* tmac/ptx.tmac: New file.
* NEWS, man/groff_tmac: man: Document it.
Diffstat (limited to 'tmac/ptx.tmac')
| -rw-r--r-- | tmac/ptx.tmac | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/tmac/ptx.tmac b/tmac/ptx.tmac new file mode 100644 index 00000000..f8d4da39 --- /dev/null +++ b/tmac/ptx.tmac @@ -0,0 +1,40 @@ +.\" ptx.tmac +.\" +.\" Provide `.xx' macro to format permuted index entries as created +.\" by GNU ptx. +.\" +.\" Written 2008 by Werner Lemberg (wl@gnu.org) +.\" +.\" Public domain. +. +.nr ptx-ref-pos (\n[.l] - .65i) +.nr ptx-head-pos (\n[ptx-ref-pos] / 2) +. +.ds ptx-sep-2 " \" +.ds ptx-sep-4 " \" +.ds ptx-sep-5 " \" +. +. +.de xx +. ds ptx-sep-1 +. if \w\\$2 \ +. ds ptx-sep-1 " \|\" +. +. ds ptx-sep-3 +. if \w\\$4 \ +. ds ptx-sep-3 " \|\" +. +. ds ptx-filler \\*[ptx-sep-4]\f3\a\fP\\*[ptx-sep-5] +. ta (\\n[ptx-ref-pos]u - \w\\*[ptx-sep-5]u) +. +\h(\\n[ptx-head-pos]u - \w\\$1\\*[ptx-sep-1]\\$2\\*[ptx-sep-2]u)\ +\\$1\\*[ptx-sep-1]\ +\\$2\\*[ptx-sep-2]\ +\\$3\\*[ptx-sep-3]\ +\\$4\\*[ptx-filler]\ +\\$5 +.. +. +.nf +. +.\" eof |