mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 11:02:53 +00:00
fixup! org-id-update-id-locations: Optimize performance
Avoid modifying FILES by side effect.
This commit is contained in:
parent
11ce194dcf
commit
47b04383e7
|
@ -511,7 +511,7 @@ If SILENT is non-nil, messages are suppressed."
|
||||||
(lambda (f)
|
(lambda (f)
|
||||||
(when (file-exists-p f)
|
(when (file-exists-p f)
|
||||||
(list f (file-attribute-modification-time (file-attributes f)))))
|
(list f (file-attribute-modification-time (file-attributes f)))))
|
||||||
(sort files #'string<))))
|
(sort (copy-sequence files) #'string<))))
|
||||||
(unless (equal checksum org-id--locations-checksum) ; Files have changed since the last update.
|
(unless (equal checksum org-id--locations-checksum) ; Files have changed since the last update.
|
||||||
(setq org-id-locations nil)
|
(setq org-id-locations nil)
|
||||||
(with-temp-buffer
|
(with-temp-buffer
|
||||||
|
|
Loading…
Reference in a new issue