@@ -2003,7 +2003,7 @@ closing = do
2003blockCommands :: PandocMonad m => M.Map Text (LP m Blocks)
2003blockCommands :: PandocMonad m => M.Map Text (LP m Blocks)
2004blockCommands = M.fromList $
2004blockCommands = M.fromList $
2005 [ ("par", mempty <$ skipopts)
2005 [ ("par", mempty <$ skipopts)
2006− , ("parbox", braced >> grouped blocks)
2006+ , ("parbox", skipopts >> braced >> grouped blocks)
2007 , ("title", mempty <$ (skipopts *>
2007 , ("title", mempty <$ (skipopts *>
2008 (grouped inline >>= addMeta "title")
2008 (grouped inline >>= addMeta "title")
2009 <|> (grouped block >>= addMeta "title")))
2009 <|> (grouped block >>= addMeta "title")))