forked from mirrors/org-mode
org-e-beamer: Do not normalize empty arguments
* contrib/lisp/org-e-beamer.el (org-e-beamer--normalize-argument): Do not normalize empty arguments.
This commit is contained in:
parent
cd9ce4b914
commit
436c2a0794
|
@ -227,6 +227,7 @@ TYPE is a symbol among the following:
|
|||
`action' Return ARGUMENT within angular brackets.
|
||||
`defaction' Return ARGUMENT within both square and angular brackets.
|
||||
`option' Return ARGUMENT within square brackets."
|
||||
(if (not (string-match "\\S-" argument)) ""
|
||||
(case type
|
||||
(action (if (string-match "\\`<.*>\\'" argument) argument
|
||||
(format "<%s>" argument)))
|
||||
|
@ -239,7 +240,7 @@ TYPE is a symbol among the following:
|
|||
(t (format "[<%s>]" argument))))
|
||||
(option (if (string-match "\\`\\[.*\\]\\'" argument) argument
|
||||
(format "[%s]" argument)))
|
||||
(otherwise argument)))
|
||||
(otherwise argument))))
|
||||
|
||||
(defun org-e-beamer--element-has-overlay-p (element)
|
||||
"Non-nil when ELEMENT has an overlay specified.
|
||||
|
|
Loading…
Reference in a new issue