@@ -395,7 +395,8 @@ definitionListItem = try $ do
395-- paragraph block
395-- paragraph block
398−para = htmlTag "p" >> inlinesTilEnd "p" >>= return . Para . normalizeSpaces
398+para = try $ htmlTag "p" >> inlinesTilEnd "p" >>=
399+ return . Para . normalizeSpaces
401-- plain block
402-- plain block