aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2022-09-20 10:22:21 -0700
committerJohn MacFarlane <[email protected]>2022-09-20 10:22:21 -0700
commit3af93d041ad983ad10e1cbf41fcd455f9a904e22 (patch)
tree1e164d1af4735ef355096d40393814ef78a3011a /src
parentf3e9669e8478c19f1bd00ff788275f4fd99fc6be (diff)
Ms writer: properly format display equations.
Previously they were being translated to eqn as inline equations. Closes #8308.
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/Ms.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs
index 28b2c438c..0c16e0388 100644
--- a/src/Text/Pandoc/Writers/Ms.hs
+++ b/src/Text/Pandoc/Writers/Ms.hs
@@ -454,7 +454,7 @@ inlineToMs opts (Math InlineMath str) = do
Left il -> inlineToMs opts il
Right r -> return $ literal "@" <> literal r <> literal "@"
inlineToMs opts (Math DisplayMath str) = do
- res <- convertMath writeEqn InlineMath str
+ res <- convertMath writeEqn DisplayMath str
case res of
Left il -> do
contents <- inlineToMs opts il