Make `Sm' start no-spacing after the first output word. Fix in both

-T[x]html and -T{pdf,ps,ascii}.  Reported by Jason McIntyre.

2 files changed, 4 insertions, 0 deletions

diff --git a/html.c b/html.c
index 5a6002e9..8ec167e5 100644
--- a/html.c
+++ b/html.c
@@ -419,6 +419,8 @@ print_otag(struct html *h, enum htmltag tag,
 
 	if ( ! (h->flags & HTML_NONOSPACE))
 		h->flags &= ~HTML_NOSPACE;
+	else
+		h->flags |= HTML_NOSPACE;
 
 	/* Print out the tag name and attributes. */
 
diff --git a/term.c b/term.c
index 24fc0114..b1c373b1 100644
--- a/term.c
+++ b/term.c
@@ -502,6 +502,8 @@ term_word(struct termp *p, const char *word)
 
 	if ( ! (p->flags & TERMP_NONOSPACE))
 		p->flags &= ~TERMP_NOSPACE;
+	else
+		p->flags |= TERMP_NOSPACE;
 
 	p->flags &= ~TERMP_SENTENCE;