===================================================================
RCS file: /cvs/mandoc/mdoc_html.c,v
retrieving revision 1.57
retrieving revision 1.58
diff -u -p -r1.57 -r1.58
--- mandoc/mdoc_html.c	2010/04/05 08:51:56	1.57
+++ mandoc/mdoc_html.c	2010/04/06 07:27:42	1.58
@@ -1,4 +1,4 @@
-/*	$Id: mdoc_html.c,v 1.57 2010/04/05 08:51:56 kristaps Exp $ */
+/*	$Id: mdoc_html.c,v 1.58 2010/04/06 07:27:42 kristaps Exp $ */
 /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -666,9 +666,9 @@ mdoc_fl_pre(MDOC_ARGS)
 
 	print_text(h, "\\-");
 
-	/* A blank `Fl' should incur a subsequent space. */
-
 	if (n->child)
+		h->flags |= HTML_NOSPACE;
+	else if (n->next && n->next->line == n->line)
 		h->flags |= HTML_NOSPACE;
 
 	return(1);