From ed1a9f25e07b6ba9355192a1ca8ebedd5495e953 Mon Sep 17 00:00:00 2001
From: Kristaps Dzonsons <kristaps@bsd.lv>
Date: Wed, 12 May 2010 16:01:01 +0000
Subject: Tiny EOS patch.  Back-end cues front-end through flag.  Front-end
 cues output engine with flag.

---
 mdoc.c | 30 ++++++++++++++++++++++++++++--
 1 file changed, 28 insertions(+), 2 deletions(-)

(limited to 'mdoc.c')

diff --git a/mdoc.c b/mdoc.c
index aa6891fd..a00feaaf 100644
--- a/mdoc.c
+++ b/mdoc.c
@@ -1,4 +1,4 @@
-/*	$Id: mdoc.c,v 1.127 2010/05/08 10:25:27 kristaps Exp $ */
+/*	$Id: mdoc.c,v 1.128 2010/05/12 16:01:01 kristaps Exp $ */
 /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -689,7 +689,33 @@ mdoc_ptext(struct mdoc *m, int line, char *buf)
 
 	/* Allocate the whole word. */
 
-	return(mdoc_word_alloc(m, line, 0, buf));
+	if ( ! mdoc_word_alloc(m, line, 0, buf))
+		return(0);
+
+	/*
+	 * End-of-sentence check.  If the last character is an unescaped
+	 * EOS character, then flag the node as being the end of a
+	 * sentence.  The front-end will know how to interpret this.
+	 */
+
+	assert(i);
+
+	switch (buf[i - 1]) {
+	case ('.'):
+		if (i > 1 && '\\' == buf[i - 2])
+			break;
+		/* FALLTHROUGH */
+	case ('!'):
+		/* FALLTHROUGH */
+	case ('?'):
+		m->last->flags |= MDOC_EOS;
+		break;
+	default:
+		break;
+
+	}
+
+	return(1);
 }
 
 
-- 
cgit v1.2.3-56-ge451