\f escapes appear to work properly for -Thtml -man. Needs more testing.

1 files changed, 5 insertions, 1 deletions

diff --git a/html.c b/html.c
index 741be084..e6409ffa 100644
--- a/html.c
+++ b/html.c
@@ -247,7 +247,7 @@ print_metaf(struct html *h, enum roffdeco deco)
 		assert(h->metaf == h->tags.head);
 		print_tagq(h, h->metaf);
 	}
-	
+
 	PAIR_CLASS_INIT(&tag, class);
 	h->metaf = print_otag(h, TAG_SPAN, 1, &tag);
 }
@@ -432,6 +432,8 @@ print_tagq(struct html *h, const struct tag *until)
 	struct tag	*tag;
 
 	while ((tag = h->tags.head) != NULL) {
+		if (tag == h->metaf)
+			h->metaf = NULL;
 		print_ctag(h, tag->tag);
 		h->tags.head = tag->next;
 		free(tag);
@@ -449,6 +451,8 @@ print_stagq(struct html *h, const struct tag *suntil)
 	while ((tag = h->tags.head) != NULL) {
 		if (suntil && tag == suntil)
 			return;
+		if (tag == h->metaf)
+			h->metaf = NULL;
 		print_ctag(h, tag->tag);
 		h->tags.head = tag->next;
 		free(tag);