Commit 894a1f33 authored by Dmitry Gutov's avatar Dmitry Gutov

Speed up package--list-loaded-files a bit

Fixes: debbugs:19390

* lisp/emacs-lisp/package.el (package--list-loaded-files): Don't call
file-truename on load-history elements.
parent cf077327
2014-12-17 Dmitry Gutov <dgutov@yandex.ru>
* emacs-lisp/package.el (package--list-loaded-files): Don't call
file-truename on load-history elements (bug#19390).
2014-12-16 Nicolas Petton <petton.nicolas@gmail.com>
* emacs-lisp/seq.el: New file.
......
......@@ -559,8 +559,7 @@ Return the max version (as a string) if the package is held at a lower version."
"Recursively list all files in DIR which correspond to loaded features.
Returns the `file-name-sans-extension' of each file, relative to
DIR, sorted by most recently loaded last."
(let* ((history (mapcar (lambda (x) (file-name-sans-extension
(file-truename (car x))))
(let* ((history (mapcar (lambda (x) (file-name-sans-extension (car x)))
load-history))
(dir (file-truename dir))
;; List all files that have already been loaded.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment