From af909a217df6995141adfafc1e1b49c93745b070 Mon Sep 17 00:00:00 2001 From: Kristaps Dzonsons 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 | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/term_ps.c b/term_ps.c index 464515ba..29b2ce75 100644 --- a/term_ps.c +++ b/term_ps.c @@ -1,4 +1,4 @@ -/* $Id: term_ps.c,v 1.5 2010/06/09 08:31:18 kristaps Exp $ */ +/* $Id: term_ps.c,v 1.6 2010/06/10 23:56:33 kristaps Exp $ */ /* * Copyright (c) 2008, 2009 Kristaps Dzonsons * @@ -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 v1.2.3-56-ge451