Tiny EOS patch. Back-end cues front-end through flag. Front-end cues output engine with flag.

1 files changed, 27 insertions, 1 deletions

diff --git a/mdoc.c b/mdoc.c
index 08064f34..efa18631 100644
--- a/mdoc.c
+++ b/mdoc.c
@@ -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);
 }