diff --git a/lisp/org.el b/lisp/org.el index 5892489..b251cbe 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -8781,7 +8781,7 @@ Possible values in the list of contexts are `table', `headline', and `item'." (setq x (if (symbolp x) (list x) - (list (car x) (cdr x)))) + (list (car x) (list 'quote (cdr x))))) (if (and (not (get (car x) 'org-state)) (string-match "^\\(org-\\|orgtbl-\\|outline-\\|comment-\\|paragraph-\\|auto-fill\\|normal-auto-fill\\|fill-paragraph\\|indent-\\)" @@ -8810,15 +8810,8 @@ call CMD." (org-load-modules-maybe) (unless org-local-vars (setq org-local-vars (org-get-local-variables))) - (let (symbols values) - (dolist (var org-local-vars) - (when (or (not (boundp (car var))) - (eq (symbol-value (car var)) - (default-value (car var)))) - (push (car var) symbols) - (push (cadr var) values))) - (progv symbols values - (call-interactively cmd)))) + (org-let org-local-vars + (call-interactively cmd))) ;;;; Archiving