View | Details | Raw Unified | Return to bug 65443
Collapse All | Expand All

(-)groff.old/tmac/an-old.tmac (-10 / +16 lines)
Lines 260-266 Link Here
260
.    el \
260
.    el \
261
.      sp .5i
261
.      sp .5i
262
.  \}
262
.  \}
263
.  ev 1
263
.  ev an-1
264
.  ps \\n[PS]u
264
.  ps \\n[PS]u
265
.  vs \\n[VS]u
265
.  vs \\n[VS]u
266
.  lt \\n[LT]u
266
.  lt \\n[LT]u
Lines 286-292 Link Here
286
.af an-page-letter a
286
.af an-page-letter a
287
.
287
.
288
.de1 an-p-footer
288
.de1 an-p-footer
289
.  ev 1
289
.  ev an-1
290
.  ps \\n[PS]u
290
.  ps \\n[PS]u
291
.  vs \\n[VS]u
291
.  vs \\n[VS]u
292
.  lt \\n[LT]u
292
.  lt \\n[LT]u
Lines 417-439 Link Here
417
.  di
417
.  di
418
.  nr an-div? 0
418
.  nr an-div? 0
419
.  ll
419
.  ll
420
.  \" We must emit the diversion in a separate environment to
421
.  \" assure that a possible margin character is printed correctly.
422
.  ev an-2
423
.  evc 0
424
.  mc
425
.  nf
426
.  in \\n[an-margin]u
420
.  ie (\\n[dl] + \\n[an-tag-sep] > \\n[an-prevailing-indent]) \{\
427
.  ie (\\n[dl] + \\n[an-tag-sep] > \\n[an-prevailing-indent]) \{\
421
.    in \\n[an-margin]u
422
.    ne (2v + 1u)
428
.    ne (2v + 1u)
423
.    an-div
429
.    an-div
430
.    ev
424
.    in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
431
.    in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
425
.  \}
432
.  \}
426
.  el \{\
433
.  el \{\
427
.    \" In nroff mode, if the indentation value is not an integer multiple
434
.    \" In nroff mode, the indentation value should be an integer multiple
428
.    \" of the character cell, it is possible that the following combination
435
.    \" of the character cell, to avoid different results compared to the
429
.    \" of .in and .ti yields a different result as the .in request in
430
.    \" the .ie part above.
436
.    \" the .ie part above.
431
.    in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
432
.    ti -\\n[an-prevailing-indent]u
433
.    chop an-div
434
.    ne (1v + 1u)
437
.    ne (1v + 1u)
435
.    DEVTAG-COL 1
438
.    DEVTAG-COL 1
436
\\*[an-div]\\h'|\\n[an-prevailing-indent]u'\c
439
.    an-div
440
.    sp -1
441
.    ev
442
.    in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
437
.    DEVTAG-COL-NEXT 2
443
.    DEVTAG-COL-NEXT 2
438
.  \}
444
.  \}
439
..
445
..

Return to bug 65443