From cdaa80e718ac177fb355819fc48c57f77d2a6bd1 Mon Sep 17 00:00:00 2001 From: Jesse Rosenthal Date: Tue, 27 Feb 2018 09:34:24 -0500 Subject: Powerpoint writer: add test for table and list syntax These were never added when the tests were first created. Output files checked in MS PowerPoint 2013 (Windows 10, VBox). No corruption, and output as expected. --- test/Tests/Writers/Powerpoint.hs | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'test/Tests/Writers') diff --git a/test/Tests/Writers/Powerpoint.hs b/test/Tests/Writers/Powerpoint.hs index bca39c24f..9af8fc471 100644 --- a/test/Tests/Writers/Powerpoint.hs +++ b/test/Tests/Writers/Powerpoint.hs @@ -53,6 +53,14 @@ tests = groupPptxTests [ pptxTests "Inline formatting" def{ writerSlideLevel = Just 1 } "pptx/slide_breaks.native" "pptx/slide_breaks_slide_level_1.pptx" + , pptxTests "lists" + def + "pptx/lists.native" + "pptx/lists.pptx" + , pptxTests "tables" + def + "pptx/tables.native" + "pptx/tables.pptx" , pptxTests "table of contents" def{ writerTableOfContents = True } "pptx/slide_breaks.native" @@ -81,4 +89,5 @@ tests = groupPptxTests [ pptxTests "Inline formatting" def "pptx/remove_empty_slides.native" "pptx/remove_empty_slides.pptx" + ] -- cgit v1.2.3