diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2012-03-12 11:06:49 -0700 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2012-03-12 11:06:49 -0700 |
| commit | 60fb915351c22bea339dbce503a03c691c793f6b (patch) | |
| tree | be1e9c3d27780a385b37219e2b8ea9155fd74cca /src/Text | |
| parent | 1202f016bbb109e780587477024d8c3ae31d55a3 (diff) | |
| download | pandoc-60fb915351c22bea339dbce503a03c691c793f6b.tar.gz | |
Use {} around ctable caption. Closes #445.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/LaTeX.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index 55275e046..0a6f8669c 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -372,7 +372,7 @@ blockToLaTeX (Table caption aligns widths heads rows) = do captionText <- inlineListToLaTeX caption let capt = if isEmpty captionText then empty - else text "caption = " <> captionText <> "," <> space + else text "caption = {" <> captionText <> "}," <> space rows' <- mapM (tableRowToLaTeX False aligns widths) rows let rows'' = intersperse ("\\\\\\noalign{\\medskip}") rows' tableNotes <- liftM (reverse . stTableNotes) get |