From c9cb315fab3e9676f28a0eee09b05ed66b63bf87 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Fri, 26 Mar 2010 08:35:02 +0100 Subject: [PATCH] Fix some documentation issues for BEAMER export --- doc/ChangeLog | 1 + doc/org.texi | 3 +++ lisp/ChangeLog | 3 +++ lisp/org-beamer.el | 14 +++++++++----- 4 files changed, 16 insertions(+), 5 deletions(-) diff --git a/doc/ChangeLog b/doc/ChangeLog index 1943f78cd..c03b49375 100644 --- a/doc/ChangeLog +++ b/doc/ChangeLog @@ -1,6 +1,7 @@ 2010-03-26 Carsten Dominik * org.texi (Publishing options): Document the :email option. + (Beamer class export): Fix bug in the BEAMER example. 2010-03-25 Carsten Dominik diff --git a/doc/org.texi b/doc/org.texi index 42685d470..1d0469ec5 100644 --- a/doc/org.texi +++ b/doc/org.texi @@ -9762,6 +9762,9 @@ Here is a simple example Org document that is intended for beamer export. ** Frame 2 \\ where we will not use columns *** Request :B_block: Please test this stuff! + :PROPERTIES: + :BEAMER_env: block + :END: @end smallexample For more information, see the documentation on Worg. diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c73154636..8f535aa68 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2010-03-26 Carsten Dominik + * org-beamer.el (org-beamer-select-environment): Renamed from + `org-beamer-set-environment-tag'. Improve docstring. + * org-freemind.el (org-freemind-write-mm-buffer): Fix another problem with odd levels. diff --git a/lisp/org-beamer.el b/lisp/org-beamer.el index 68bfc9e8e..8ba6a6925 100644 --- a/lisp/org-beamer.el +++ b/lisp/org-beamer.el @@ -124,7 +124,7 @@ For example Each entry has 4 elements: name Name of the environment -key Selection key for `org-beamer-set-environment-tag' +key Selection key for `org-beamer-select-environment' open The opening template for the environment, with the following excapes %a the action/overlay specification %A the default action/overlay specification @@ -176,9 +176,13 @@ close The closing string of the environment." (setq org-beamer-columns-open nil) (insert "\\end{columns}\n"))) -(defun org-beamer-set-environment-tag () - "Set an environment tag, to determine the beamer environment to be used. -This makes use of the fast tag selection interface." +(defun org-beamer-select-environment () + "Select the environment to be used by beamer for this entry. +While this uses (for convenince) a tag selection interface, the result +of this command will be that the BEAMER_env *property* of the entry is set. + +In addition to this, the command will also set a tag as a visual aid, but +the tag does not have any semantic meaning." (interactive) (let* ((envs (append org-beamer-environments-extra org-beamer-environments-default)) @@ -344,7 +348,7 @@ this function dynamically." (defvar org-beamer-mode-map (make-sparse-keymap) "The keymap for `org-beamer-mode'.") -(define-key org-beamer-mode-map "\C-c\C-b" 'org-beamer-set-environment-tag) +(define-key org-beamer-mode-map "\C-c\C-b" 'org-beamer-select-environment) (define-minor-mode org-beamer-mode "Special support for editing Org-mode files made to export to beamer."