diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2016-01-20 09:57:52 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2016-01-20 09:57:52 -0800 |
| commit | 3875df7d872e49910b99c91d4bb8e900c5cda559 (patch) | |
| tree | 6063f334500a925742697ad0656b828d499ba2fe /src/Text | |
| parent | f2c0974a26b7de7d39168268de7c6257f14c56be (diff) | |
| parent | 7a18879a36740c097811a3d446d195adb7319f46 (diff) | |
| download | pandoc-3875df7d872e49910b99c91d4bb8e900c5cda559.tar.gz | |
Merge pull request #2665 from monofon/fix/table-alignment
LaTeX writer: Allow more flexible table alignment
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 2dcbf62bf..e4e882b8c 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -591,7 +591,7 @@ blockToLaTeX (Table caption aligns widths heads rows) = do rows' <- mapM (tableRowToLaTeX False aligns widths) rows let colDescriptors = text $ concat $ map toColDescriptor aligns modify $ \s -> s{ stTable = True } - return $ "\\begin{longtable}[c]" <> + return $ "\\begin{longtable}[]" <> braces ("@{}" <> colDescriptors <> "@{}") -- the @{} removes extra space at beginning and end $$ capt |