date and time created 87/02/15 16:35:33 by lepreau
[unix-history] / usr / src / share / me / footnote.me
index 5d7024c..0321e2c 100644 (file)
@@ -1,5 +1,5 @@
 .nr _0 \n(c.
 .nr _0 \n(c.
-.\"    @(#)footnote.me 2.4     %G%
+.\"    @(#)footnote.me 2.6     %G%
 .\"    %beginstrip%
 .de (f                 \" *** begin footnote
 .ec
 .\"    %beginstrip%
 .de (f                 \" *** begin footnote
 .ec
 .      in 0
 .      xl \\n($lu-\\n(fuu
 .      @F \\n(ff
 .      in 0
 .      xl \\n($lu-\\n(fuu
 .      @F \\n(ff
-.      sz \\n(fpu
+.      sz \\n(fp
 .      vs \\n(.su*\\n($Ru
 .      if !\\n(?f \
 \{\
 .      vs \\n(.su*\\n($Ru
 .      if !\\n(?f \
 \{\
-.              nr _b +2u*\n(.Vu        \" fudge factor
+.              nr _b +1v       \" allow space for $s
 .              $s
 .      \}
 .      br
 .              $s
 .      \}
 .      br
@@ -32,7 +32,7 @@
 .              in 0            \" reset everything from .bc
 .              xl \\n($lu-\\n(fuu
 .              @F \\n(ff
 .              in 0            \" reset everything from .bc
 .              xl \\n($lu-\\n(fuu
 .              @F \\n(ff
-.              sz \\n(fpu
+.              sz \\n(fp
 .              vs \\n(.su*\\n($Ru
 .              if !\\n(?f \
 .                      $s
 .              vs \\n(.su*\\n($Ru
 .              if !\\n(?f \
 .                      $s