From 68f8a896da9347f427199378b4986e899a67247c Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 6 May 2002 13:32:32 +0000
Subject: [haddock @ 2002-05-06 13:32:32 by simonmar] Be more lenient about
 extra paragraph breaks

---
 src/HaddockParse.y | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src')

diff --git a/src/HaddockParse.y b/src/HaddockParse.y
index 5236cf58..a406f3e4 100644
--- a/src/HaddockParse.y
+++ b/src/HaddockParse.y
@@ -27,7 +27,9 @@ import HaddockTypes
 
 doc	:: { ParsedDoc }
 	: apara PARA doc	{ docAppend $1 $3 }
+	| PARA doc 		{ $2 }
 	| apara			{ $1 }
+	| {- empty -}		{ DocEmpty }
 
 apara	:: { ParsedDoc }
 	: ulpara		{ DocUnorderedList [$1] }
-- 
cgit v1.2.3