Merge branch 'maint'

This commit is contained in:
Achim Gratz 2013-04-28 10:25:59 +02:00
commit 5ca2ea00b2
1 changed files with 1 additions and 1 deletions

View File

@ -144,7 +144,7 @@ default value. Return nil if no template was found."
(org-element-property :args macro)) (org-element-property :args macro))
;; No argument: remove place-holder. ;; No argument: remove place-holder.
"")) ""))
template))) template nil 'literal)))
;; VALUE starts with "(eval": it is a s-exp, `eval' it. ;; VALUE starts with "(eval": it is a s-exp, `eval' it.
(when (string-match "\\`(eval\\>" value) (when (string-match "\\`(eval\\>" value)
(setq value (eval (read value)))) (setq value (eval (read value))))