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:
parent
5cdac2607d
commit
145c3f54f9
5 changed files with 17 additions and 0 deletions
|
@ -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"
|
||||
]
|
||||
|
|
2
test/pptx/endnotes.native
Normal file
2
test/pptx/endnotes.native
Normal 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
BIN
test/pptx/endnotes.pptx
Normal file
Binary file not shown.
BIN
test/pptx/endnotes_toc.pptx
Normal file
BIN
test/pptx/endnotes_toc.pptx
Normal file
Binary file not shown.
BIN
test/pptx/slide_breaks_toc.pptx
Normal file
BIN
test/pptx/slide_breaks_toc.pptx
Normal file
Binary file not shown.
Loading…
Reference in a new issue