[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Accepted] [Orgmode] Allow inclusion of author's email in LaTeX export
From: |
Bastien Guerry |
Subject: |
[Accepted] [Orgmode] Allow inclusion of author's email in LaTeX export |
Date: |
Mon, 17 Jan 2011 20:18:36 +0100 (CET) |
Patch 536 (http://patchwork.newartisans.com/patch/536/) is now "Accepted".
Maintainer comment: none
This relates to the following submission:
http://mid.gmane.org/%3C1294928979-14439-1-git-send-email-wence%40gmx.li%3E
Here is the original message containing the patch:
> Content-Type: text/plain; charset="utf-8"
> MIME-Version: 1.0
> Content-Transfer-Encoding: 7bit
> Subject: [Orgmode] Allow inclusion of author's email in LaTeX export
> Date: Thu, 13 Jan 2011 19:29:39 -0000
> From: Lawrence Mitchell <address@hidden>
> X-Patchwork-Id: 536
> Message-Id: <address@hidden>
> To: address@hidden
> Cc: Lawrence Mitchell <address@hidden>
>
> * org-latex.el (org-export-latex-make-header): Export email in
> author line if `org-export-email-info' is non-nil.
>
> Previously exporting to LaTeX would not include the document author's
> email address when org-export-email-info was set. This patch corrects
> this oversight using the \thanks command to add a footnote to the
> author line.
>
> ---
> lisp/org-latex.el | 12 +++++++++---
> 1 files changed, 9 insertions(+), 3 deletions(-)
>
> diff --git a/lisp/org-latex.el b/lisp/org-latex.el
> index 8a9f9eb..4b36273 100644
> --- a/lisp/org-latex.el
> +++ b/lisp/org-latex.el
> @@ -1276,7 +1276,9 @@ TITLE is the current title from the buffer or region.
> OPT-PLIST is the options plist for current buffer."
> (let ((toc (plist-get opt-plist :table-of-contents))
> (author (org-export-apply-macros-in-string
> - (plist-get opt-plist :author))))
> + (plist-get opt-plist :author)))
> + (email (org-export-apply-macros-in-string
> + (plist-get opt-plist :email))))
> (concat
> (if (plist-get opt-plist :time-stamp-file)
> (format-time-string "%% Created %Y-%m-%d %a %H:%M\n"))
> @@ -1300,8 +1302,12 @@ OPT-PLIST is the options plist for current buffer."
> (org-export-latex-fontify-headline title))
> ;; insert author info
> (if (plist-get opt-plist :author-info)
> - (format "\\author{%s}\n"
> - (org-export-latex-fontify-headline (or author user-full-name)))
> + (format "\\author{%s%s}\n"
> + (org-export-latex-fontify-headline (or author user-full-name))
> + (if (and org-export-email-info email
> + (string-match "\\S-" email))
> + (format "\\thanks{%s}" email)
> + ""))
> (format "%%\\author{%s}\n"
> (org-export-latex-fontify-headline (or author user-full-name))))
> ;; insert the date
>