diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2011-08-20 15:30:57 -0700 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2011-08-20 15:30:57 -0700 |
| commit | 24095e061553fcb7a524e32d2b8971ab4d12e40e (patch) | |
| tree | 1c21aa9c202fa9fa29535a525d231849047a87df /src/Text/Pandoc/Writers/ConTeXt.hs | |
| parent | 64f8bdf6f26b2247ce92c25b557aed03bfcb2f30 (diff) | |
| download | pandoc-24095e061553fcb7a524e32d2b8971ab4d12e40e.tar.gz | |
ConTeXt writer: Changed 'descr' to 'description', fixed alignment.
Diffstat (limited to 'src/Text/Pandoc/Writers/ConTeXt.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/ConTeXt.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/ConTeXt.hs b/src/Text/Pandoc/Writers/ConTeXt.hs index 01b2cd601..b59b71cf0 100644 --- a/src/Text/Pandoc/Writers/ConTeXt.hs +++ b/src/Text/Pandoc/Writers/ConTeXt.hs @@ -214,8 +214,8 @@ defListItemToConTeXt :: ([Inline], [[Block]]) -> State WriterState Doc defListItemToConTeXt (term, defs) = do term' <- inlineListToConTeXt term def' <- liftM vsep $ mapM blockListToConTeXt defs - return $ "\\startdescr" <> braces term' $$ nest 2 def' $$ - "\\stopdescr" <> blankline + return $ "\\startdescription" <> braces term' $$ nest 2 def' $$ + "\\stopdescription" <> blankline -- | Convert list of block elements to ConTeXt. blockListToConTeXt :: [Block] -> State WriterState Doc |