From 359b10b3070588e8b751935b3fbcc2c9d8885a6a Mon Sep 17 00:00:00 2001 From: Myles English Date: Sat, 17 Nov 2012 15:18:16 +0000 Subject: [PATCH] org-e-latex: Fixes bug introduced by commit 907110e * contrib/lisp/org-e-latex.el: Floating tables get a \centering declaration, otherwise the table get wrapped in \begin{center} and \end{center} environment. Thanks to Andreas Leha for reporting it. TINYCHANGE --- contrib/lisp/org-e-latex.el | 18 ++++++++++-------- 1 file changed, 10 insertions(+), 8 deletions(-) diff --git a/contrib/lisp/org-e-latex.el b/contrib/lisp/org-e-latex.el index 41513a182..84ef2a5b6 100644 --- a/contrib/lisp/org-e-latex.el +++ b/contrib/lisp/org-e-latex.el @@ -2302,20 +2302,22 @@ This function assumes TABLE has `org' as its `:type' attribute." (if (or org-e-latex-table-caption-above (string= "" caption)) "" (concat (org-trim caption) "\\\\\n")))) ;; Others. - (t (concat (when float-env - (concat - (format "\\begin{%s}%s\n" float-env placement) - (if org-e-latex-table-caption-above caption ""))) - (when org-e-latex-tables-centered "\\centering\n") + (t (concat (if float-env + (concat + (format "\\begin{%s}%s\n" float-env placement) + (if org-e-latex-table-caption-above caption "") + (when org-e-latex-tables-centered "\\centering\n")) + (when org-e-latex-tables-centered "\\begin{center}\n")) (format "\\begin{%s}%s{%s}\n%s\\end{%s}" table-env (if width (format "{%s}" width) "") alignment contents table-env) - (when float-env - (concat (if org-e-latex-table-caption-above "" caption) - (format "\n\\end{%s}" float-env)))))))) + (if float-env + (concat (if org-e-latex-table-caption-above "" caption) + (format "\n\\end{%s}" float-env)) + (when org-e-latex-tables-centered "\n\\end{center}"))))))) (defun org-e-latex-table--table.el-table (table contents info) "Return appropriate LaTeX code for a table.el table.