[O] [PATCH] org-e-latex: Fixes bug introduced by commit 907110e

2012-11-17 Thread Myles English 

Fixes bug reported to the mailing list with [O] [BUG] centering export
of babel results.

From e9e99b22d814c1272475f30e4bc7543cc46603f4 Mon Sep 17 00:00:00 2001
From: Myles English mylesengl...@gmail.com
Date: Sat, 17 Nov 2012 15:18:16 +
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.
---
 contrib/lisp/org-e-latex.el | 12 +++-
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/contrib/lisp/org-e-latex.el b/contrib/lisp/org-e-latex.el
index 41513a1..d74c30a 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
+ (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)
+  (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
+   (if float-env
  (concat (if org-e-latex-table-caption-above  caption)
- (format \n\\end{%s} float-env
+ (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.
-- 
1.8.0

Re: [O] [PATCH] org-e-latex: Fixes bug introduced by commit 907110e

2012-11-17 Thread Myles English 

I forgot the say TINYCHANGE.

Myles English writes:

 Fixes bug reported to the mailing list with [O] [BUG] centering export
 of babel results.

 From e9e99b22d814c1272475f30e4bc7543cc46603f4 Mon Sep 17 00:00:00 2001
 From: Myles English mylesengl...@gmail.com
 Date: Sat, 17 Nov 2012 15:18:16 +
 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.
 ---
  contrib/lisp/org-e-latex.el | 12 +++-
  1 file changed, 7 insertions(+), 5 deletions(-)

 diff --git a/contrib/lisp/org-e-latex.el b/contrib/lisp/org-e-latex.el
 index 41513a1..d74c30a 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
 + (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)
 +(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
 + (if float-env
 (concat (if org-e-latex-table-caption-above  caption)
 -   (format \n\\end{%s} float-env
 +   (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.