From a24d107e6f9247af0cefc73e797ad4aa441af7e3 Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Sat, 1 Nov 2008 22:44:53 +0000 Subject: Support horizontal rules in OpenDocument and ODT writers. Added style for Horizontal_20_Rule to odt-styles/styles.xml. Add support for horizontal rules in OpenDocument writer. Resolves Issue #95. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1479 788f1e2b-df1e-0410-8736-df70ead52e1b --- Text/Pandoc/Writers/OpenDocument.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Text') diff --git a/Text/Pandoc/Writers/OpenDocument.hs b/Text/Pandoc/Writers/OpenDocument.hs index a49bed49f..52438f81e 100644 --- a/Text/Pandoc/Writers/OpenDocument.hs +++ b/Text/Pandoc/Writers/OpenDocument.hs @@ -298,7 +298,7 @@ blockToOpenDocument o bs | OrderedList a b <- bs = orderedList a b | Table c a w h r <- bs = table c a w h r | Null <- bs = return empty - | HorizontalRule <- bs = return empty + | HorizontalRule <- bs = return $ selfClosingTag "text:p" [ ("text:style-name", "Horizontal_20_Line") ] | otherwise = return empty where defList b = do setInDefinitionList True -- cgit v1.2.3