diff options
author | John MacFarlane <jgm@berkeley.edu> | 2016-12-10 16:52:35 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-01-25 17:07:41 +0100 |
commit | 2e7b0c7edaac9fbba52ac3cbc6380dbfb74805cf (patch) | |
tree | a467c1c7312e488cf4626698f4de02c9a9ff4184 /tests/Tests/Readers/Odt.hs | |
parent | 6643e401eed85d1a1366b1d2193fb06e285c7448 (diff) | |
download | pandoc-2e7b0c7edaac9fbba52ac3cbc6380dbfb74805cf.tar.gz |
Added ReaderOptions parameter to readNative.
This makes it similar to the other readers -- even
though ReaderOptions is essentially ignored, the uniformity
is nice.
Diffstat (limited to 'tests/Tests/Readers/Odt.hs')
-rw-r--r-- | tests/Tests/Readers/Odt.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/Tests/Readers/Odt.hs b/tests/Tests/Readers/Odt.hs index c3a44a729..b0e916336 100644 --- a/tests/Tests/Readers/Odt.hs +++ b/tests/Tests/Readers/Odt.hs @@ -63,7 +63,7 @@ compareOdtToNative :: TestCreator compareOdtToNative opts odtPath nativePath = do nativeFile <- Prelude.readFile nativePath odtFile <- B.readFile odtPath - native <- getNoNormVia id "native" <$> runIO (readNative nativeFile) + native <- getNoNormVia id "native" <$> runIO (readNative def nativeFile) odt <- getNoNormVia id "odt" <$> runIO (readOdt opts odtFile) return (odt,native) |