Backport commit 32763dac4 from Emacs
Since 'add-to-list', being a plain function, cannot access lexical variables, such use must be rewritten for correctness. (Some instances actually do work thanks to a compiler macro, but it's not something code should rely on.) * lisp/org.el (org-reload): Replace add-to-list with push. Replace add-to-list to lexical variable with push (bug#39373) 32763dac46e61cc34e8fe4d19df4905d09c1a27f Mattias Engdegård Sat Feb 1 22:27:23 2020 +0100
This commit is contained in:
parent
9712d1cdff
commit
7c63da6fb9
|
@ -18709,13 +18709,14 @@ With prefix arg UNCOMPILED, load the uncompiled versions."
|
|||
(and (string= org-dir contrib-dir)
|
||||
(org-load-noerror-mustsuffix (concat contrib-dir f)))
|
||||
(and (org-load-noerror-mustsuffix (concat (org-find-library-dir f) f))
|
||||
(add-to-list 'load-uncore f 'append)
|
||||
(push f load-uncore)
|
||||
't)
|
||||
f))
|
||||
lfeat)))
|
||||
(when load-uncore
|
||||
(message "The following feature%s found in load-path, please check if that's correct:\n%s"
|
||||
(if (> (length load-uncore) 1) "s were" " was") load-uncore))
|
||||
(if (> (length load-uncore) 1) "s were" " was")
|
||||
(reverse load-uncore)))
|
||||
(if load-misses
|
||||
(message "Some error occurred while reloading Org feature%s\n%s\nPlease check *Messages*!\n%s"
|
||||
(if (> (length load-misses) 1) "s" "") load-misses (org-version nil 'full))
|
||||
|
|
Loading…
Reference in New Issue