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:
Nicolas Goaziou 2012-08-22 17:45:18 +02:00
parent cd9ce4b914
commit 436c2a0794

View file

@ -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.