aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Moellmann2000-12-29 11:47:19 +0000
committerGerd Moellmann2000-12-29 11:47:19 +0000
commitdc8921906b8b4d635f94ad11cbdb6f37d5e82cb1 (patch)
tree6e5c2057c5f7711259bc2d9009509a17331a970b
parentf6cab6c82f2f59fce01954cfacd1822ec7573fdc (diff)
downloademacs-dc8921906b8b4d635f94ad11cbdb6f37d5e82cb1.tar.gz
emacs-dc8921906b8b4d635f94ad11cbdb6f37d5e82cb1.zip
Handle form feed better when ps-zebra-stripe-follow
is non-nil. (printZebra, BeginPage): Code fix.
-rw-r--r--etc/ps-prin1.ps3
1 files changed, 2 insertions, 1 deletions
diff --git a/etc/ps-prin1.ps b/etc/ps-prin1.ps
index 007c2e01003..4c6acf8dbe0 100644
--- a/etc/ps-prin1.ps
+++ b/etc/ps-prin1.ps
@@ -334,7 +334,7 @@ StandardEncoding 46 82 getinterval aload pop
334 /double-zebra ZebraHeight ZebraHeight add def 334 /double-zebra ZebraHeight ZebraHeight add def
335 /yiter double-zebra LineHeight mul neg def 335 /yiter double-zebra LineHeight mul neg def
336 /xiter PrintWidth InterColumn add def 336 /xiter PrintWidth InterColumn add def
337 /zebra-line PageNumber 1 sub NumberOfColumns mul LinesPerColumn mul def 337 /zebra-line LinesPrinted def
338 NumberOfColumns{LinesPerColumn doColumnZebra xiter 0 rmoveto}repeat 338 NumberOfColumns{LinesPerColumn doColumnZebra xiter 0 rmoveto}repeat
339 grestore 339 grestore
340}def 340}def
@@ -456,6 +456,7 @@ StandardEncoding 46 82 getinterval aload pop
456/PrintHeaderWidth PrintOnlyOneHeader{PrintPageWidth}{PrintWidth}ifelse def 456/PrintHeaderWidth PrintOnlyOneHeader{PrintPageWidth}{PrintWidth}ifelse def
457 457
458/BeginPage{ 458/BeginPage{
459 /LinesPrinted exch def
459 % ---- when 1st column, print all background effects 460 % ---- when 1st column, print all background effects
460 ColumnIndex 1 eq{ 461 ColumnIndex 1 eq{
461 0 PrintStartY moveto % move to where printing will start 462 0 PrintStartY moveto % move to where printing will start