diff options
author | John MacFarlane <jgm@berkeley.edu> | 2018-01-22 13:26:55 -0700 |
---|---|---|
committer | GitHub <noreply@github.com> | 2018-01-22 13:26:55 -0700 |
commit | be929bcc80466623462102a39dd98726bb6c7781 (patch) | |
tree | 8f7d30a529b274e72e68b19f9bc1afd8a30bd153 | |
parent | f8640fdff0ead507914c402109b02a778ca1c4c3 (diff) | |
parent | 71bbadb7936e68673a46f7391caf446e35c81205 (diff) | |
download | pandoc-be929bcc80466623462102a39dd98726bb6c7781.tar.gz |
Merge pull request #4291 from hmenke/xtables
ConTeXt writer: xtables: correct wrong usage of caption
-rw-r--r-- | src/Text/Pandoc/Writers/ConTeXt.hs | 2 | ||||
-rw-r--r-- | test/Tests/Writers/ConTeXt.hs | 2 | ||||
-rw-r--r-- | test/tables.context | 6 |
3 files changed, 5 insertions, 5 deletions
diff --git a/src/Text/Pandoc/Writers/ConTeXt.hs b/src/Text/Pandoc/Writers/ConTeXt.hs index 64b7d2c53..bca00b55a 100644 --- a/src/Text/Pandoc/Writers/ConTeXt.hs +++ b/src/Text/Pandoc/Writers/ConTeXt.hs @@ -267,7 +267,7 @@ blockToConTeXt (Table caption aligns widths heads rows) = do return $ "\\startplacetable" <> brackets ( if null caption then "location=none" - else "caption=" <> braces captionText + else "title=" <> braces captionText ) $$ body $$ "\\stopplacetable" <> blankline tableToConTeXt :: PandocMonad m => Tabl -> Doc -> [Doc] -> WM m Doc diff --git a/test/Tests/Writers/ConTeXt.hs b/test/Tests/Writers/ConTeXt.hs index 5ce629674..678321519 100644 --- a/test/Tests/Writers/ConTeXt.hs +++ b/test/Tests/Writers/ConTeXt.hs @@ -92,7 +92,7 @@ tests = [ testGroup "inline code" plain $ text "3.3", plain $ text "3.4"]] in table caption aligns headers rows - =?> unlines [ "\\startplacetable[caption={Table 1}]" + =?> unlines [ "\\startplacetable[title={Table 1}]" , "\\startTABLE" , "\\startTABLEhead" , "\\NC[align=left] Right" diff --git a/test/tables.context b/test/tables.context index 89ff4a025..11dffc065 100644 --- a/test/tables.context +++ b/test/tables.context @@ -1,6 +1,6 @@ Simple table with caption: -\startplacetable[caption={Demonstration of simple table syntax.}] +\startplacetable[title={Demonstration of simple table syntax.}] \startxtable \startxtablehead[head] \startxrow @@ -74,7 +74,7 @@ Simple table without caption: Simple table indented two spaces: -\startplacetable[caption={Demonstration of simple table syntax.}] +\startplacetable[title={Demonstration of simple table syntax.}] \startxtable \startxtablehead[head] \startxrow @@ -111,7 +111,7 @@ Simple table indented two spaces: Multiline table with caption: -\startplacetable[caption={Here's the caption. It may span multiple lines.}] +\startplacetable[title={Here's the caption. It may span multiple lines.}] \startxtable \startxtablehead[head] \startxrow |