@@ -905,10 +905,10 @@ ordered_list = do
905905
906906paragraph :: LP Blocks
907907paragraph = do
908− x <- mconcat <$> many1 inline
908+ x <- trimInlines . mconcat <$> many1 inline
909909 if x == mempty
910910 then return mempty
911− else return $ para $ trimInlines x
911+ else return $ para x
912912
913913preamble :: LP Blocks
914914preamble = mempty <$> manyTill preambleBlock beginDoc