Fix defvar-setq again

This commit is contained in:
Ivan Malison 2016-06-28 20:35:12 -07:00
parent b3aca91086
commit c244133073

View File

@ -909,7 +909,7 @@ For composing functions with an apply so that they can be used with the ~:around
(org-entry-get (get-text-property 1 'org-marker agenda-entry) "CREATED"))) (org-entry-get (get-text-property 1 'org-marker agenda-entry) "CREATED")))
(defmacro defvar-setq (name value) (defmacro defvar-setq (name value)
`(if (boundp ,name) `(if (boundp (quote ,name))
(setq ,name ,value) (setq ,name ,value)
(defvar ,name ,value))) (defvar ,name ,value)))