diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-01-15 20:42:00 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-01-25 17:07:42 +0100 |
| commit | 4f6e6247f9a672770a6d7a55a3aa2709a860ff38 (patch) | |
| tree | c745fed7bb50d9fdfa6cbcc2ec76b620756e4bd4 /tests/Tests/Readers/Org.hs | |
| parent | a58369a7e650758004975084f984efb2bf3d7d68 (diff) | |
| download | pandoc-4f6e6247f9a672770a6d7a55a3aa2709a860ff38.tar.gz | |
Made `smart` extension default for pandoc markdown.
Updated tests.
Diffstat (limited to 'tests/Tests/Readers/Org.hs')
| -rw-r--r-- | tests/Tests/Readers/Org.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/Tests/Readers/Org.hs b/tests/Tests/Readers/Org.hs index ed29f1377..ef0530b37 100644 --- a/tests/Tests/Readers/Org.hs +++ b/tests/Tests/Readers/Org.hs @@ -9,11 +9,11 @@ import Text.Pandoc import Data.List (intersperse) org :: String -> Pandoc -org = purely $ readOrg def - +org = purely $ readOrg def{ readerExtensions = getDefaultExtensions "org" } + orgSmart :: String -> Pandoc orgSmart = purely $ readOrg def { readerExtensions = - enableExtension Ext_smart $ readerExtensions def } + enableExtension Ext_smart $ getDefaultExtensions "org" } infix 4 =: (=:) :: ToString c |