summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorƁukasz Stelmach <lukasz.stelmach@iem.pw.edu.pl>2010-03-04 14:51:02 +0100
committerCarsten Dominik <carsten.dominik@gmail.com>2010-03-04 21:55:18 +0100
commit9d0740d0fa8d5b1896c7934bd5504ddd628d7270 (patch)
treee5cb20303d077147f3cff3dd4579f37a2eaf6c58
parent5c980da49611a5c5574e01170eaf49d87d0ee9ed (diff)
downloadorg-mode-9d0740d0fa8d5b1896c7934bd5504ddd628d7270.tar.gz
beamer: Add custom options to an outline frame.
With org-beamer-outline-frame-options you may specify frame options like: allowframebreaks or fragile.
-rw-r--r--lisp/org-beamer.el11
1 files changed, 10 insertions, 1 deletions
diff --git a/lisp/org-beamer.el b/lisp/org-beamer.el
index dcfe682..68bfc9e 100644
--- a/lisp/org-beamer.el
+++ b/lisp/org-beamer.el
@@ -501,6 +501,14 @@ This funcion will run in the final LaTeX document."
:type '(string :tag "Outline frame title")
)
+(defcustom org-beamer-outline-frame-options nil
+ "Outline frame options appended after \\begin{frame}. You might
+want to put e.g. [allowframebreaks=0.9] here. Remember to include
+square brackets."
+ :group 'org-beamer
+ :type '(string :tag "Outline frame options")
+)
+
(defun org-beamer-fix-toc ()
"Fix the table of contents by removing the vspace line."
(when org-beamer-export-is-beamer-p
@@ -509,7 +517,8 @@ This funcion will run in the final LaTeX document."
(when (re-search-forward "\\(\\\\setcounter{tocdepth.*\n\\\\tableofcontents.*\n\\)\\(\\\\vspace\\*.*\\)"
nil t)
(replace-match
- (concat "\\\\begin{frame}\n\\\\frametitle{"
+ (concat "\\\\begin{frame}" org-beamer-outline-frame-options
+ "\n\\\\frametitle{"
org-beamer-outline-frame-title
"}\n\\1\\\\end{frame}")
t nil)))))