diff options
author | Nicolas Goaziou <n.goaziou@gmail.com> | 2013-01-12 12:04:11 +0100 |
---|---|---|
committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2013-01-12 12:04:11 +0100 |
commit | 0c9579bb74e48608ab6a94f1cf1187b1bf0b1ffe (patch) | |
tree | 054f9bb3162b8d22e8373d5779fc6178256411f7 | |
parent | c1ecc518358884a8f028a055fdf907363eb6a37c (diff) | |
download | org-mode-0c9579bb74e48608ab6a94f1cf1187b1bf0b1ffe.tar.gz |
org-e-beamer: Toggle hypersetup inclusion in template too
* contrib/lisp/org-e-beamer.el (org-e-beamer-template): Toggle
hypersetup inclusion in template too.
-rw-r--r-- | contrib/lisp/org-e-beamer.el | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/contrib/lisp/org-e-beamer.el b/contrib/lisp/org-e-beamer.el index e79efb9..871aa9f 100644 --- a/contrib/lisp/org-e-beamer.el +++ b/contrib/lisp/org-e-beamer.el @@ -30,11 +30,11 @@ ;; `org-e-beamer-export-to-latex' ("tex" file) and ;; `org-e-beamer-export-to-pdf' ("pdf" file). ;; -;; On top of buffer keywords supported by `e-latex' back-end (see -;; `org-e-latex-options-alist'), this back-end introduces the -;; following keywords: "BEAMER_THEME", "BEAMER_COLOR_THEME", -;; "BEAMER_FONT_THEME", "BEAMER_INNER_THEME" and "BEAMER_OUTER_THEME". -;; All accept options in square brackets. +;; On top of buffer keywords and options items supported by `e-latex' +;; back-end (see `org-e-latex-options-alist'), this back-end +;; introduces the following keywords: "BEAMER_THEME", +;; "BEAMER_COLOR_THEME", "BEAMER_FONT_THEME", "BEAMER_INNER_THEME" and +;; "BEAMER_OUTER_THEME". All accept options in square brackets. ;; ;; Moreover, headlines now fall into three categories: sectioning ;; elements, frames and blocks. @@ -874,11 +874,12 @@ holding export options." ;; 7. Title (format "\\title{%s}\n" title) ;; 8. Hyperref options. - (format "\\hypersetup{\n pdfkeywords={%s},\n pdfsubject={%s},\n pdfcreator={%s}}\n" - (or (plist-get info :keywords) "") - (or (plist-get info :description) "") - (if (not (plist-get info :with-creator)) "" - (plist-get info :creator))) + (when (plist-get info :latex-hyperref-p) + (format "\\hypersetup{\n pdfkeywords={%s},\n pdfsubject={%s},\n pdfcreator={%s}}\n" + (or (plist-get info :keywords) "") + (or (plist-get info :description) "") + (if (not (plist-get info :with-creator)) "" + (plist-get info :creator)))) ;; 9. Document start. "\\begin{document}\n\n" ;; 10. Title command. |