From mboxrd@z Thu Jan  1 00:00:00 1970
Received: from krisdoz.my.domain (kristaps@localhost [127.0.0.1])
	by krisdoz.my.domain (8.14.3/8.14.3) with ESMTP id o5ANuXZh001829
	for <source@mdocml.bsd.lv>; Thu, 10 Jun 2010 19:56:33 -0400 (EDT)
Received: (from kristaps@localhost)
	by krisdoz.my.domain (8.14.3/8.14.3/Submit) id o5ANuXW4018343;
	Thu, 10 Jun 2010 19:56:33 -0400 (EDT)
Date: Thu, 10 Jun 2010 19:56:33 -0400 (EDT)
Message-Id: <201006102356.o5ANuXW4018343@krisdoz.my.domain>
X-Mailinglist: mdocml-source
Reply-To: source@mdocml.bsd.lv
MIME-Version: 1.0
From: kristaps@mdocml.bsd.lv
To: source@mdocml.bsd.lv
Subject: mdocml: Allow open word contexts in -Tps to preserve whitespace, as 
X-Mailer: activitymail 1.26, http://search.cpan.org/dist/activitymail/
Content-Type: text/plain; charset=utf-8

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