mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

lisp/org.el: Use non-obsolete variable names 

* lisp/org.el (org-set-regexps-and-options): Use non-obsolete
variable names.
This commit is contained in:
Bastien 2020-11-11 09:11:52 +01:00
parent 95af0a244f
commit 370cf49cd2
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/org.el
View File

@ -4336,9 +4336,9 @@ related expressions."
(let ((value (cdr (assoc "PRIORITIES" alist))))
(pcase (and value (split-string value))
(`(,high ,low ,default . ,_)
(setq-local org-highest-priority (org-priority-to-value high))
(setq-local org-lowest-priority (org-priority-to-value low))
(setq-local org-default-priority (org-priority-to-value default)))))
(setq-local org-priority-highest (org-priority-to-value high))
(setq-local org-priority-lowest (org-priority-to-value low))
(setq-local org-priority-default (org-priority-to-value default)))))
;; Scripts.
(let ((value (cdr (assoc "OPTIONS" alist))))
(dolist (option value)