From c9691b91dfe51fd4f4fabf72bdf23d5ca4754f8f Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Thu, 22 Nov 2018 22:02:08 -0500 Subject: OpenDocument writer: small amendment to #5095. Level one lists should start at 0.5in rather than 0.75in. (At least this is how LibreOffice behaves for me with a new document.) --- src/Text/Pandoc/Writers/OpenDocument.hs | 2 +- test/writer.opendocument | 378 ++++++++++++++++---------------- 2 files changed, 190 insertions(+), 190 deletions(-) diff --git a/src/Text/Pandoc/Writers/OpenDocument.hs b/src/Text/Pandoc/Writers/OpenDocument.hs index 071826117..d61a6d7c9 100644 --- a/src/Text/Pandoc/Writers/OpenDocument.hs +++ b/src/Text/Pandoc/Writers/OpenDocument.hs @@ -601,7 +601,7 @@ orderedListLevelStyle (s,n, d) (l,ls) = listLevelStyle :: Int -> Doc listLevelStyle i = - let indent = show (0.5 + (0.25 * fromIntegral i :: Double)) in + let indent = show (0.25 + (0.25 * fromIntegral i :: Double)) in inTags True "style:list-level-properties" [ ("text:list-level-position-and-space-mode", "label-alignment") diff --git a/test/writer.opendocument b/test/writer.opendocument index 0073d5957..625cdf2c6 100644 --- a/test/writer.opendocument +++ b/test/writer.opendocument @@ -7,1005 +7,1005 @@ - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + -- cgit v1.2.3