summaryrefslogtreecommitdiff
path: root/test/Tests/Writers
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2017-11-13 18:41:30 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2017-11-13 18:41:49 +0300
commit3a83b3843db6434e9806558ea1e912055d5baf04 (patch)
treeba8ae5cdcedf55e752f9325705f739ee3f48421d /test/Tests/Writers
parente5e8350fcb3ea321efc28aaf88413677b3c97613 (diff)
Replace "emacs" extension with "amuse" extension
It makes clear that extension is related to Muse markup.
Diffstat (limited to 'test/Tests/Writers')
-rw-r--r--test/Tests/Writers/Muse.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index e5c19c7bc..a6c1edc3b 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -8,7 +8,9 @@ import Text.Pandoc.Arbitrary ()
import Text.Pandoc.Builder
muse :: (ToPandoc a) => a -> String
-muse = museWithOpts def{ writerWrapText = WrapNone }
+muse = museWithOpts def{ writerWrapText = WrapNone,
+ writerExtensions = extensionsFromList [Ext_amuse,
+ Ext_auto_identifiers] }
museWithOpts :: (ToPandoc a) => WriterOptions -> a -> String
museWithOpts opts = unpack . purely (writeMuse opts) . toPandoc