diff --git a/test/Tests/Readers/Docx.hs b/test/Tests/Readers/Docx.hs index d9935967f6c2..8d2576f63b67 100644 --- a/test/Tests/Readers/Docx.hs +++ b/test/Tests/Readers/Docx.hs @@ -265,6 +265,10 @@ tests = [ testGroup "document" "i18n blocks (headers and blockquotes)" "docx/i18n_blocks.docx" "docx/i18n_blocks.native" + , testCompare + "Image before Title" + "docx/image-before-title.docx" + "docx/image-before-title.native" , testCompare "lists" "docx/lists.docx" diff --git a/test/docx/image-before-title.docx b/test/docx/image-before-title.docx new file mode 100644 index 000000000000..dd23d9000786 Binary files /dev/null and b/test/docx/image-before-title.docx differ diff --git a/test/docx/image-before-title.native b/test/docx/image-before-title.native new file mode 100644 index 000000000000..7f9b5905b655 --- /dev/null +++ b/test/docx/image-before-title.native @@ -0,0 +1,87 @@ +[ Para + [ Image + ( "" + , [] + , [ ( "width" , "6.268055555555556in" ) + , ( "height" , "6.268055555555556in" ) + ] + ) + [ Str "A" + , Space + , Str "cat" + , Space + , Str "holding" + , Space + , Str "a" + , Space + , Str "rainbow" + , Space + , Str "flag." + ] + ( "media/image1.jpeg" , "" ) + ] +, Title + [ Str "This" + , Space + , Str "is" + , Space + , Str "a" + , Space + , Str "title" + ] +, Subtitle + [ Str "This" + , Space + , Str "is" + , Space + , Str "a" + , Space + , Str "subtitle" + ] +, Header + 1 + ( "this-is-a-heading-1" , [] , [] ) + [ Str "This" + , Space + , Str "is" + , Space + , Str "a" + , Space + , Str "heading" + , Space + , Str "1" + ] +, Para + [ Str "This" + , Space + , Str "is" + , Space + , Str "some" + , Space + , Str "text." + ] +, Header + 2 + ( "this-is-a-heading-2" , [] , [] ) + [ Str "This" + , Space + , Str "is" + , Space + , Str "a" + , Space + , Str "heading" + , Space + , Str "2" + ] +, Para + [ Str "This" + , Space + , Str "is" + , Space + , Str "also" + , Space + , Str "some" + , Space + , Str "text." + ] +]