[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] org-e-latex: Tables get correct amount of vertical space
From: |
Myles English |
Subject: |
[O] [PATCH] org-e-latex: Tables get correct amount of vertical space |
Date: |
Tue, 13 Nov 2012 14:29:21 +0000 |
User-agent: |
mu4e 0.9.9.5-dev1; emacs 24.2.1 |
Hi,
This patch replaces every occurence of the \begin{center} environment
with \centering in the file contrib/lisp/org-e-latex.el. I have tested
the export of a basic table and it works but not sure if all the
replacements are correct.
( BTW, this issue came to light using the nag package like this:
\RequirePackage[l2tabu, orthodox]{nag} )
Myles
>From 54ae2245978fa755cd5daa483616ffdfa3e5ed0f Mon Sep 17 00:00:00 2001
From: Myles English <address@hidden>
Date: Tue, 13 Nov 2012 14:14:56 +0000
Subject: [PATCH] org-e-latex: Tables get correct amount of vertical space
* contrib/lisp/org-e-latex.el: Replaced \begin{center} ..\end{center}
environments with \centering declarations.
Using both \begin{table} and \being{center} environments leads to double
the vertical space around the float, whereas \centering adds none.
TINYCHANGE
---
contrib/lisp/org-e-latex.el | 17 +++++++----------
1 file changed, 7 insertions(+), 10 deletions(-)
diff --git a/contrib/lisp/org-e-latex.el b/contrib/lisp/org-e-latex.el
index 165beb3..c268c2c 100644
--- a/contrib/lisp/org-e-latex.el
+++ b/contrib/lisp/org-e-latex.el
@@ -550,14 +550,13 @@ in order to mimic default behaviour:
\(when tags
\(format \"\\\\hfill{}\\\\textsc{:%s:}\"
\(mapconcat 'identity tags \":\")))))
- \(format (concat \"\\\\begin{center}\\n\"
+ \(format (concat \"\\\\centering\\n\"
\"\\\\fbox{\\n\"
\"\\\\begin{minipage}[c]{.6\\\\textwidth}\\n\"
\"%s\\n\\n\"
\"\\\\rule[.8em]{\\\\textwidth}{2pt}\\n\\n\"
\"%s\"
- \"\\\\end{minipage}}\"
- \"\\\\end{center}\")
+ \"\\\\end{minipage}}\")
full-title contents))"
:group 'org-export-e-latex
:type 'function)
@@ -1086,7 +1085,7 @@ CONTENTS holds the contents of the center block. INFO is
a plist
holding contextual information."
(org-e-latex--wrap-label
center-block
- (format "\\begin{center}\n%s\\end{center}" contents)))
+ (format "\\centering\n%s" contents)))
;;;; Clock
@@ -1508,15 +1507,14 @@ holding contextual information."
title
(when tags (format "\\hfill{}\\textsc{:%s:}"
(mapconcat 'identity tags ":"))))))
- (format (concat "\\begin{center}\n"
+ (format (concat "\\centering\n"
"\\fbox{\n"
"\\begin{minipage}[c]{.6\\textwidth}\n"
"%s\n\n"
"\\rule[.8em]{\\textwidth}{2pt}\n\n"
"%s"
"\\end{minipage}\n"
- "}\n"
- "\\end{center}")
+ "}")
full-title contents))))))
@@ -2302,14 +2300,13 @@ This function assumes TABLE has `org' as its `:type'
attribute."
(concat
(format "\\begin{%s}%s\n" float-env placement)
(if org-e-latex-table-caption-above caption "")))
- (when org-e-latex-tables-centered "\\begin{center}\n")
+ (when org-e-latex-tables-centered "\\centering\n")
(format "\\begin{%s}%s{%s}\n%s\\end{%s}"
table-env
(if width (format "{%s}" width) "")
alignment
contents
table-env)
- (when org-e-latex-tables-centered "\n\\end{center}")
(when float-env
(concat (if org-e-latex-table-caption-above "" caption)
(format "\n\\end{%s}" float-env))))))))
@@ -2351,7 +2348,7 @@ attribute."
(unless (= n 2)
(setq output (replace-match "" nil nil output)))))))
(if (not org-e-latex-tables-centered) output
- (format "\\begin{center}\n%s\n\\end{center}" output))))
+ (format "\\centering\n%s" output))))
;;;; Table Cell
--
1.8.0
- [O] [PATCH] org-e-latex: Tables get correct amount of vertical space,
Myles English <=
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Sebastien Vauban, 2012/11/13
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Myles English, 2012/11/13
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Nick Dokos, 2012/11/13
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Sebastien Vauban, 2012/11/13
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Nick Dokos, 2012/11/13
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Nick Dokos, 2012/11/13
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Sebastien Vauban, 2012/11/14
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Myles English, 2012/11/14
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Myles English, 2012/11/13
- Re: [O] [PATCH] org-e-latex: Tables get correct amount of vertical space, Nicolas Goaziou, 2012/11/14