diff options
author | John MacFarlane <jgm@berkeley.edu> | 2018-11-22 22:02:08 -0500 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2018-11-22 22:02:08 -0500 |
commit | c9691b91dfe51fd4f4fabf72bdf23d5ca4754f8f (patch) | |
tree | 0e0e2b05110b5305b7dfdf16348539d7a6b9bd8a /src/Text/Pandoc/Writers | |
parent | 2e1366b3e0d9614dca69e198075f057c8db25ab4 (diff) | |
download | pandoc-c9691b91dfe51fd4f4fabf72bdf23d5ca4754f8f.tar.gz |
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.)
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r-- | src/Text/Pandoc/Writers/OpenDocument.hs | 2 |
1 files changed, 1 insertions, 1 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") |