git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: change tests to make use of media bag.
commit941df1b0de29ccde84505d625998e4dcb7ed0936 authorJesse Rosenthal <jrosenthal@jhu.edu> dateWed 30 Jul 2014, 12:46 (12 years ago) parent9ce2295
2 files changed+3−2
compare with master
unifiedsplit
tests/Tests/Readers/Docx.hs+2−1 tests/docx.image_no_embed.native+1−1
tests/Tests/Readers/Docx.hs+2−1
@@ -37,7 +37,8 @@ compareOutput :: ReaderOptions
3737compareOutput opts docxFile nativeFile = do
3838 df <- B.readFile docxFile
3939 nf <- Prelude.readFile nativeFile
40− return $ (noNorm (readDocx opts df), noNorm (readNative nf))
40+ let (p, _) = readDocx opts df
41+ return $ (noNorm p, noNorm (readNative nf))
4142
4243testCompareWithOptsIO :: ReaderOptions -> String -> FilePath -> FilePath -> IO Test
4344testCompareWithOptsIO opts name docxFile nativeFile = do
tests/docx.image_no_embed.native+1−1
@@ -1,2 +1,2 @@
11[Header 2 ("an-image",[],[]) [Str "An",Space,Str "image"]
2−,Para [Image [] ("word/media/image1.jpeg","")]]
2+,Para [Image [] ("media/image1.jpeg","")]]