diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2020-03-06 09:45:46 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2020-03-06 09:45:46 -0800 |
| commit | 2ab83a56e60227339c8c0064988d1264606bfed0 (patch) | |
| tree | 8045adcaf42279affec4d77683460523e6934c6b /src/Text/Pandoc | |
| parent | aaf296508aba8f9a95132abfb9aed904738adaaa (diff) | |
| download | pandoc-2ab83a56e60227339c8c0064988d1264606bfed0.tar.gz | |
Ms writer: use .QS/.QE instead of .RS/.RE for block quotes.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/Ms.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs index 19eb87f89..42d6b932b 100644 --- a/src/Text/Pandoc/Writers/Ms.hs +++ b/src/Text/Pandoc/Writers/Ms.hs @@ -216,7 +216,7 @@ blockToMs opts (BlockQuote blocks) = do setFirstPara contents <- blockListToMs opts blocks setFirstPara - return $ literal ".RS" $$ contents $$ literal ".RE" + return $ literal ".QS" $$ contents $$ literal ".QE" blockToMs opts (Table caption alignments widths headers rows) = let aligncode AlignLeft = "l" aligncode AlignRight = "r" |