mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2025-01-05 11:45:52 +00:00
Export: Handle undefined variables.
Some of the standard export options are now defined in backend specific files. This commit makes sure that building the options property list will not cause an error because of unneeded (for the backend) undefined variables.
This commit is contained in:
parent
6e9fb4550f
commit
933137aa02
@ -1,3 +1,8 @@
|
||||
2009-04-12 Carsten Dominik <carsten.dominik@gmail.com>
|
||||
|
||||
* org-exp.el (org-default-export-plist): Handle undefined
|
||||
variables.
|
||||
|
||||
2009-04-11 Carsten Dominik <carsten.dominik@gmail.com>
|
||||
|
||||
* org.el (org-sort-entries-or-items): Match TODO keywrds
|
||||
|
@ -579,9 +579,11 @@ Each element is a list of 3 items:
|
||||
|
||||
(defun org-default-export-plist ()
|
||||
"Return the property list with default settings for the export variables."
|
||||
(let ((l org-export-plist-vars) rtn e)
|
||||
(let ((l org-export-plist-vars) rtn e s v)
|
||||
(while (setq e (pop l))
|
||||
(setq rtn (cons (car e) (cons (symbol-value (nth 2 e)) rtn))))
|
||||
(setq s (nth 2 e)
|
||||
v (if (boundp s) (symbol-value s) nil)
|
||||
rtn (cons s (cons v rtn))))
|
||||
rtn))
|
||||
|
||||
(defvar org-export-inbuffer-options-extra nil
|
||||
|
Loading…
Reference in New Issue
Block a user