mdocml: Allow open word contexts in -Tps to preserve whitespace, as

mdocml: Allow open word contexts in -Tps to preserve whitespace, as

[kristaps]

Log Message:
-----------
Allow open word contexts in -Tps to preserve whitespace, as whitespace
apparently doesn't collapse in PostScript (surprise!).  Makes output
files much more compact.

Modified Files:
--------------
    mdocml:
        term_ps.c

Revision Data
-------------
Index: term_ps.c
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/term_ps.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -Lterm_ps.c -Lterm_ps.c -u -p -r1.5 -r1.6
--- term_ps.c
+++ 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;
--
 To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv