In -Tman .Bl -compact, skip the blank line only before the first item

of the first list in a section, not before every item of the first list.
OpenBSD rev. 1.37

1 files changed, 2 insertions, 1 deletions

diff --git a/mdoc_man.c b/mdoc_man.c
index c372ba7a..2673fe4a 100644
--- a/mdoc_man.c
+++ b/mdoc_man.c
@@ -1116,7 +1116,8 @@ pre_it(DECL_ARGS)
 		outflags |= MMAN_PP | MMAN_nl;
 		bln = n->parent->parent;
 		if (0 == bln->norm->Bl.comp ||
-		    NULL == bln->parent->prev)
+		    (NULL == n->parent->prev &&
+		     NULL == bln->parent->prev))
 			outflags |= MMAN_sp;
 		outflags &= ~MMAN_br;
 		switch (bln->norm->Bl.type) {