Powerpoint writer: Add further tests

Tests added for:

 - table of contents
 - endnotes
 - endnotes with table of contents

Powerpoint output checked in MS PowerPoint 2013 (Windows)
This commit is contained in:
Jesse Rosenthal 2018-01-22 11:52:03 -05:00
parent 5cdac2607d
commit 145c3f54f9
5 changed files with 17 additions and 0 deletions

View file

@ -198,4 +198,19 @@ tests = [ pptxTest
def{ writerSlideLevel = Just 1 }
"pptx/slide_breaks.native"
"pptx/slide_breaks_slide_level_1.pptx"
, pptxTest
"table of contents"
def{ writerTableOfContents = True }
"pptx/slide_breaks.native"
"pptx/slide_breaks_toc.pptx"
, pptxTest
"end notes"
def
"pptx/endnotes.native"
"pptx/endnotes.pptx"
, pptxTest
"end notes, with table of contents"
def { writerTableOfContents = True }
"pptx/endnotes.native"
"pptx/endnotes_toc.pptx"
]

View file

@ -0,0 +1,2 @@
Pandoc (Meta {unMeta = fromList []})
[Para [Str "Here",Space,Str "is",Space,Str "one",Space,Str "note.",Note [Para [Str "Here",Space,Str "is",Space,Str "the",Space,Str "note."]],Space,Str "And",Space,Str "one",Space,Str "more",Space,Str "note.",Note [Para [Str "And",Space,Str "another",Space,Str "note."]]]]

BIN
test/pptx/endnotes.pptx Normal file

Binary file not shown.

BIN
test/pptx/endnotes_toc.pptx Normal file

Binary file not shown.

Binary file not shown.