Ms writer: ensure we have a newline after .EN in disply math.

Closes #5251.
jgm · Jan 25, 2019 · 22b09d8 · 22b09d8
1 parent 5eaff39
commit 22b09d8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs
@@ -418,7 +418,7 @@ inlineToMs opts (Math DisplayMath str) = do
          contents <- inlineToMs opts il
          return $ cr <> text ".RS" $$ contents $$ text ".RE"
        Right r -> return $
-            cr <> text ".EQ" $$ text r $$ text ".EN"
+            cr <> text ".EQ" $$ text r $$ text ".EN" <> cr
 inlineToMs _ il@(RawInline f str)
   | f == Format "ms" = return $ text str
   | otherwise        = do