mdocml: Make `Sm' start no-spacing after the first output word.

mdocml: Make `Sm' start no-spacing after the first output word.

[kristaps]

Log Message:
-----------
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.

Modified Files:
--------------
    mdocml:
        html.c
        term.c

Revision Data
-------------
Index: term.c
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/term.c,v
retrieving revision 1.165
retrieving revision 1.166
diff -Lterm.c -Lterm.c -u -p -r1.165 -r1.166
--- term.c
+++ term.c
@@ -502,6 +502,8 @@ term_word(struct termp *p, const char *w
 
 	if ( ! (p->flags & TERMP_NONOSPACE))
 		p->flags &= ~TERMP_NOSPACE;
+	else
+		p->flags |= TERMP_NOSPACE;
 
 	p->flags &= ~TERMP_SENTENCE;
 
Index: html.c
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/html.c,v
retrieving revision 1.109
retrieving revision 1.110
diff -Lhtml.c -Lhtml.c -u -p -r1.109 -r1.110
--- html.c
+++ html.c
@@ -419,6 +419,8 @@ print_otag(struct html *h, enum htmltag 
 
 	if ( ! (h->flags & HTML_NONOSPACE))
 		h->flags &= ~HTML_NOSPACE;
+	else
+		h->flags |= HTML_NOSPACE;
 
 	/* Print out the tag name and attributes. */
 
--
 To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv