From 9c9f7631121018f484084ec3e425239539e5b7f6 Mon Sep 17 00:00:00 2001
From: Kristaps Dzonsons <kristaps@bsd.lv>
Date: Thu, 10 Jun 2010 23:56:33 +0000
Subject: Allow open word contexts in -Tps to preserve whitespace, as
 whitespace apparently doesn't collapse in PostScript (surprise!).  Makes
 output files much more compact.

---
 term_ps.c | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'term_ps.c')

diff --git a/term_ps.c b/term_ps.c
index f44c3d01..26762ace 100644
--- a/term_ps.c
+++ b/term_ps.c
@@ -268,11 +268,12 @@ ps_letter(struct termp *p, char c)
 static void
 ps_advance(struct termp *p, size_t len)
 {
+	size_t		 i;
 
 	if (PS_INLINE & p->engine.ps.psstate) {
-		/* Dump out any existing line scope. */
-		ps_printf(p, ") show\n");
-		p->engine.ps.psstate &= ~PS_INLINE;
+		for (i = 0; i < len; i++) 
+			ps_letter(p, ' ');
+		return;
 	}
 
 	p->engine.ps.pscol += len ? len * PS_CHAR_WIDTH : 0;
-- 
cgit