LaTeX reader: Don't emit empty paragraph.

See #761.
2013-02-20 13:01:36 -08:00 · 2013-02-20 13:01:36 -08:00 · 7a97369d01
commit 7a97369d01
parent 3f2dd98f45
1 changed files with 2 additions and 2 deletions
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@ -905,10 +905,10 @@ ordered_list = do

 paragraph :: LP Blocks
 paragraph = do
-  x <- mconcat <$> many1 inline
+  x <- trimInlines . mconcat <$> many1 inline
  if x == mempty
     then return mempty
-     else return $ para $ trimInlines x
+     else return $ para x

 preamble :: LP Blocks
 preamble = mempty <$> manyTill preambleBlock beginDoc