From f5916232841f68e5d069fb2218e04f5f8c5a2c9e Mon Sep 17 00:00:00 2001
From: Ingo Schwarze <schwarze@openbsd.org>
Date: Sat, 14 Jul 2012 09:07:18 +0000
Subject: 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

---
 mdoc_man.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/mdoc_man.c b/mdoc_man.c
index c438f870..97dd6671 100644
--- a/mdoc_man.c
+++ b/mdoc_man.c
@@ -1,4 +1,4 @@
-/*	$Id: mdoc_man.c,v 1.38 2012/07/13 23:57:58 schwarze Exp $ */
+/*	$Id: mdoc_man.c,v 1.39 2012/07/14 09:07:18 schwarze Exp $ */
 /*
  * Copyright (c) 2011, 2012 Ingo Schwarze <schwarze@openbsd.org>
  *
@@ -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) {
-- 
cgit v1.2.3-56-ge451