Commit ae9c0411 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

lisp/misc.el (list-dynamic-libraries): Fix computation of header fields.

parent 7f3f739f
2011-06-21 Juanma Barranquero <>
* misc.el (list-dynamic-libraries--refresh): Compute header here...
(list-dynamic-libraries): ...not here.
2011-06-21 Leo Liu <> 2011-06-21 Leo Liu <>
* subr.el (sha1): Implement sha1 using secure-hash. * subr.el (sha1): Implement sha1 using secure-hash.
...@@ -151,6 +151,7 @@ Internal use only." ...@@ -151,6 +151,7 @@ Internal use only."
(vector (list "Library" (1+ max-id-len) t) (vector (list "Library" (1+ max-id-len) t)
(list "Loaded from" (1+ max-name-len) t) (list "Loaded from" (1+ max-name-len) t)
(list "Candidate names" 0 t)))) (list "Candidate names" 0 t))))
(setq tabulated-list-entries nil) (setq tabulated-list-entries nil)
(dolist (lib dynamic-library-alist) (dolist (lib dynamic-library-alist)
(let* ((id (car lib)) (let* ((id (car lib))
...@@ -178,7 +179,6 @@ The return value is always nil." ...@@ -178,7 +179,6 @@ The return value is always nil."
(tabulated-list-mode) (tabulated-list-mode)
(setq tabulated-list-sort-key (cons "Library" nil)) (setq tabulated-list-sort-key (cons "Library" nil))
(add-hook 'tabulated-list-revert-hook 'list-dynamic-libraries--refresh nil t) (add-hook 'tabulated-list-revert-hook 'list-dynamic-libraries--refresh nil t)
(setq list-dynamic-libraries--loaded-only-p loaded-only-p) (setq list-dynamic-libraries--loaded-only-p loaded-only-p)
(list-dynamic-libraries--refresh) (list-dynamic-libraries--refresh)
(tabulated-list-print)) (tabulated-list-print))
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