From 8a9955ded5b3519ff94525c0fb33216b517e64c7 Mon Sep 17 00:00:00 2001
From: Kristaps Dzonsons <kristaps@bsd.lv>
Date: Wed, 12 May 2010 16:46:28 +0000
Subject: End-of-sentence spacing for -man -Tascii.

---
 man.c | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

(limited to 'man.c')

diff --git a/man.c b/man.c
index 7a41b1fb..99804406 100644
--- a/man.c
+++ b/man.c
@@ -1,4 +1,4 @@
-/*	$Id: man.c,v 1.64 2010/05/08 10:25:27 kristaps Exp $ */
+/*	$Id: man.c,v 1.65 2010/05/12 16:46:28 kristaps Exp $ */
 /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -420,6 +420,29 @@ man_ptext(struct man *m, int line, char *buf)
 	if ( ! man_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 |= MAN_EOS;
+		break;
+	default:
+		break;
+
+	}
+
 descope:
 	/*
 	 * Co-ordinate what happens with having a next-line scope open:
-- 
cgit v1.2.3