LaTeX reader: preserve center environment

jgm · Nov 23, 2020 · 8eb9c67 · 8eb9c67
1 parent 94c9028
commit 8eb9c67
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 1 deletion.
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -1639,7 +1639,7 @@ environments = M.fromList
           skipopts *> spaces *> optional braced *> spaces *> blocks)
    , ("figure", env "figure" $ skipopts *> figure)
    , ("subfigure", env "subfigure" $ skipopts *> tok *> figure)
-   , ("center", env "center" blocks)
+   , ("center", divWith ("", ["center"], []) <$> env "center" blocks)
    , ("longtable",  env "longtable" $
           resetCaption *> simpTable "longtable" False >>= addTableCaption)
    , ("table",  env "table" $

diff --git a/test/command/latex-center.md b/test/command/latex-center.md
@@ -0,0 +1,13 @@
+# `\begin{center}`
+
+```
+% pandoc -f latex -t native
+\begin{center}
+Hello
+\end{center}
+
+^D
+[Div ("",["center"],[])
+ [Para [Str "Hello"]]]
+```
+