Re: [O] [patch] bring back the "multiline" option for latex tables

[Eric Schulte]

If there are no objections I'm going to apply this patch.  It is
relatively small so hopefully any new bugs should be easily
identifiable.

Best -- Eric

Eric Schulte <address@hidden> writes:

> Hi,
>
> The following patch make the behavior of LaTeX table exporter more
> closely resemble the documented behavior (at least to my mind).  I'm
> hesitant to apply this patch myself as it applies to org-latex.el which
> is outside of my area of expertise.
>
> Please apply this if it looks reasonable.
>
> Thanks -- Eric
>
>
> From fc8700f52c2fbfb1ec601e3bbb32c37e38a4cfbb Mon Sep 17 00:00:00 2001
> From: Eric Schulte <address@hidden>
> Date: Wed, 1 Jun 2011 10:18:34 -0600
> Subject: [PATCH] replacing the "multicolumn" option for latex tables
>
>   This brings the behavior inline with the documentation.
>
> * lisp/org-latex.el (org-export-latex-tables): Check for the
>   "multiline" option and set the `floatp' option to true when
>   multicolumn tables are requested.
> ---
>  lisp/org-latex.el |    5 +++--
>  1 files changed, 3 insertions(+), 2 deletions(-)
>
> diff --git a/lisp/org-latex.el b/lisp/org-latex.el
> index e2c74ae..0d64f68 100644
> --- a/lisp/org-latex.el
> +++ b/lisp/org-latex.el
> @@ -1838,7 +1838,8 @@ The conversion is made depending of STRING-BEFORE and 
> STRING-AFTER."
>                    longtblp (and attr (stringp attr)
>                                  (string-match "\\<longtable\\>" attr))
>                 tblenv (if (and attr (stringp attr)
> -                               (string-match (regexp-quote "table*") attr))
> +                               (or (string-match (regexp-quote "table*") 
> attr)
> +                                   (string-match "\\<multicolumn\\>" attr)))
>                            "table*" "table")
>                 tabular-env
>                 (if (and attr (stringp attr)
> @@ -1851,7 +1852,7 @@ The conversion is made depending of STRING-BEFORE and 
> STRING-AFTER."
>                    align (and attr (stringp attr)
>                               (string-match "\\<align=\\([^ \t\n\r]+\\)" attr)
>                               (match-string 1 attr))
> -                  floatp (or caption label)
> +                  floatp (or caption label (string= "table*" tblenv))
>                 placement     (if (and attr
>                                        (stringp attr)
>                                        (string-match "[ 
> \t]*\\<placement=\\(\\S-+\\)" attr))
> -- 
> 1.7.4.1

-- 
Eric Schulte
http://cs.unm.edu/~eschulte/