aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--pandoc.cabal1
-rw-r--r--tests/Tests/Readers/Docx.hs6
-rw-r--r--tests/docx.inline_images.docxbin0 -> 37784 bytes
-rw-r--r--tests/docx.inline_images.native2
4 files changed, 8 insertions, 1 deletions
diff --git a/pandoc.cabal b/pandoc.cabal
index b30ce37aa..66b4d61c4 100644
--- a/pandoc.cabal
+++ b/pandoc.cabal
@@ -178,6 +178,7 @@ Extra-Source-Files:
tests/docx.hanging_indent.docx,
tests/docx.headers.docx,
tests/docx.image.docx,
+ tests/docx.inline_images.docx,
tests/docx.inline_code.docx,
tests/docx.inline_formatting.docx,
tests/docx.links.docx,
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
new file mode 100644
index 000000000..6288f66ff
--- /dev/null
+++ b/tests/docx.inline_images.docx
Binary files differ
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."]]