tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

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
This commit is contained in:
Myles English 2012-11-17 15:18:16 +00:00 committed by Nicolas Goaziou
parent 4c7dcd0830
commit 359b10b307
1 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
contrib/lisp/org-e-latex.el
View File

@ -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.