From 047fd921744f39a82a86d9370e03f7af511e6e84 Mon Sep 17 00:00:00 2001
From: Russ Cox <rsc@swtch.com>
Date: Mon, 25 Feb 2019 09:45:53 -0500
Subject: page: handle EPS without showpage

---
 src/cmd/page/gs.c | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/cmd/page/gs.c')

diff --git a/src/cmd/page/gs.c b/src/cmd/page/gs.c
index 7179429a..5c493b35 100644
--- a/src/cmd/page/gs.c
+++ b/src/cmd/page/gs.c
@@ -186,6 +186,10 @@ spawngs(GSInfo *g, char *safer)
 
 	Binit(&g->gsrd, stdoutp[0], OREAD);
 
+	gscmd(g, "/PAGEDIDSHOWPAGE false def\n");
+	gscmd(g, "/showpage { /PAGEDIDSHOWPAGE true def showpage } bind def\n");
+	gscmd(g, "/PAGEFLUSH { PAGEDIDSHOWPAGE not {showpage} if /PAGEDIDSHOWPAGE false def } def\n");
+
 	gscmd(g, "/PAGEOUT (/dev/fd/4) (w) file def\n");
 	if(!strcmp(safer, "-dSAFER"))
 		gscmd(g, ".setsafe\n");
-- 
cgit v1.2.3