From dc8921906b8b4d635f94ad11cbdb6f37d5e82cb1 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Fri, 29 Dec 2000 11:47:19 +0000
Subject: [PATCH] Handle form feed better when ps-zebra-stripe-follow is
 non-nil. (printZebra, BeginPage): Code fix.

---
 etc/ps-prin1.ps | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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
   /double-zebra ZebraHeight ZebraHeight add def
   /yiter double-zebra LineHeight mul neg def
   /xiter PrintWidth InterColumn add def
-  /zebra-line PageNumber 1 sub NumberOfColumns mul LinesPerColumn mul def
+  /zebra-line LinesPrinted def
   NumberOfColumns{LinesPerColumn doColumnZebra xiter 0 rmoveto}repeat
   grestore
 }def
@@ -456,6 +456,7 @@ StandardEncoding 46 82 getinterval aload pop
 /PrintHeaderWidth PrintOnlyOneHeader{PrintPageWidth}{PrintWidth}ifelse def
 
 /BeginPage{
+  /LinesPrinted exch def
   % ---- when 1st column, print all background effects
   ColumnIndex 1 eq{
     0 PrintStartY moveto		% move to where printing will start
-- 
2.39.2