diff options
| -rw-r--r-- | test/Tests/Writers/Powerpoint.hs | 5 | ||||
| -rw-r--r-- | test/pptx/raw_ooxml.native | 3 | ||||
| -rw-r--r-- | test/pptx/raw_ooxml.pptx | bin | 0 -> 26656 bytes | |||
| -rw-r--r-- | test/pptx/raw_ooxml_templated.pptx | bin | 0 -> 393982 bytes |
4 files changed, 7 insertions, 1 deletions
diff --git a/test/Tests/Writers/Powerpoint.hs b/test/Tests/Writers/Powerpoint.hs index 226cd6080..f3016cdb6 100644 --- a/test/Tests/Writers/Powerpoint.hs +++ b/test/Tests/Writers/Powerpoint.hs @@ -95,5 +95,8 @@ tests = groupPptxTests [ pptxTests "Inline formatting" def "pptx/remove_empty_slides.native" "pptx/remove_empty_slides.pptx" - + , pptxTests "raw ooxml" + def + "pptx/raw_ooxml.native" + "pptx/raw_ooxml.pptx" ] diff --git a/test/pptx/raw_ooxml.native b/test/pptx/raw_ooxml.native new file mode 100644 index 000000000..aa86ad076 --- /dev/null +++ b/test/pptx/raw_ooxml.native @@ -0,0 +1,3 @@ +[Para [Str "Here",Space,Str "is",Space,Str "some",Space,Str "text,",Space,Str "written",Space,Str "as",Space,Str "a",Space,Str "raw",Space,Str "inline:",Space,RawInline (Format "openxml") "<a:r><a:rPr /><a:t>Here are examples of </a:t></a:r><a:r><a:rPr i=\"1\" /><a:t>italics</a:t></a:r><a:r><a:rPr /><a:t>, </a:t></a:r><a:r><a:rPr b=\"1\" /><a:t>bold</a:t></a:r>"] +,HorizontalRule +,RawBlock (Format "openxml") " <p:sp>\n <p:nvSpPr>\n <p:cNvPr id=\"3\" name=\"Content Placeholder 2\"/>\n <p:cNvSpPr>\n <a:spLocks noGrp=\"1\"/>\n </p:cNvSpPr>\n <p:nvPr>\n <p:ph idx=\"1\"/>\n </p:nvPr>\n </p:nvSpPr>\n <p:spPr/>\n <p:txBody>\n <a:bodyPr/>\n <a:lstStyle/>\n <a:p>\n <a:pPr lvl=\"1\"/>\n <a:r>\n <a:rPr/>\n <a:t>Bulleted bulleted lists.</a:t>\n </a:r>\n </a:p>\n <a:p>\n <a:pPr lvl=\"1\"/>\n <a:r>\n <a:rPr/>\n <a:t>And go to arbitrary depth.</a:t>\n </a:r>\n </a:p>\n <a:p>\n <a:pPr lvl=\"2\"/>\n <a:r>\n <a:rPr/>\n <a:t>Like this</a:t>\n </a:r>\n </a:p>\n <a:p>\n <a:pPr lvl=\"3\"/>\n <a:r>\n <a:rPr/>\n <a:t>Or this</a:t>\n </a:r>\n </a:p>\n <a:p>\n <a:pPr lvl=\"2\"/>\n <a:r>\n <a:rPr/>\n <a:t>Back to here.</a:t>\n </a:r>\n </a:p>\n </p:txBody>\n </p:sp>"] diff --git a/test/pptx/raw_ooxml.pptx b/test/pptx/raw_ooxml.pptx Binary files differnew file mode 100644 index 000000000..e71fb2f01 --- /dev/null +++ b/test/pptx/raw_ooxml.pptx diff --git a/test/pptx/raw_ooxml_templated.pptx b/test/pptx/raw_ooxml_templated.pptx Binary files differnew file mode 100644 index 000000000..c0e72ca10 --- /dev/null +++ b/test/pptx/raw_ooxml_templated.pptx |