diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/Tests/Readers/Docx.hs | 6 | ||||
-rw-r--r-- | tests/docx.inline_images.docx | bin | 0 -> 37784 bytes | |||
-rw-r--r-- | tests/docx.inline_images.native | 2 |
3 files changed, 7 insertions, 1 deletions
diff --git a/tests/Tests/Readers/Docx.hs b/tests/Tests/Readers/Docx.hs index efc520dba..c310cc8d7 100644 --- a/tests/Tests/Readers/Docx.hs +++ b/tests/Tests/Readers/Docx.hs @@ -107,10 +107,14 @@ tests = [ testGroup "inlines" "docx.links.docx" "docx.links.native" , testCompare - "inline image with reference output" + "inline image" "docx.image.docx" "docx.image_no_embed.native" , testCompare + "inline image in links" + "docx.inline_images.docx" + "docx.inline_images.native" + , testCompare "handling unicode input" "docx.unicode.docx" "docx.unicode.native" diff --git a/tests/docx.inline_images.docx b/tests/docx.inline_images.docx Binary files differnew file mode 100644 index 000000000..6288f66ff --- /dev/null +++ b/tests/docx.inline_images.docx diff --git a/tests/docx.inline_images.native b/tests/docx.inline_images.native new file mode 100644 index 000000000..f962f5c09 --- /dev/null +++ b/tests/docx.inline_images.native @@ -0,0 +1,2 @@ +[Para [Str "This",Space,Str "picture",Space,Image [] ("media/image1.jpg",""),Space,Str "is",Space,Str "an",Space,Str "identicon."] +,Para [Str "Here",Space,Str "is",Space,Link [Str "one",Space,Image [] ("media/image2.jpg",""),Space,Str "that"] ("http://www.google.com",""),Space,Str "links."]] |