procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Juanma Barranquero 2011-06-21 12:04:28 +02:00
parent 7f3f739fa4
commit ae9c04116a
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2011-06-21 Juanma Barranquero <lekktu@gmail.com>
* misc.el (list-dynamic-libraries--refresh): Compute header here...
(list-dynamic-libraries): ...not here.
2011-06-21 Leo Liu <sdl.web@gmail.com>
* subr.el (sha1): Implement sha1 using secure-hash.

2
lisp/misc.el
View file

@ -151,6 +151,7 @@ Internal use only."
(vector (list "Library" (1+ max-id-len) t)
(list "Loaded from" (1+ max-name-len) t)
(list "Candidate names" 0 t))))
(tabulated-list-init-header)
(setq tabulated-list-entries nil)
(dolist (lib dynamic-library-alist)
(let* ((id (car lib))
@ -178,7 +179,6 @@ The return value is always nil."
(tabulated-list-mode)
(setq tabulated-list-sort-key (cons "Library" nil))
(add-hook 'tabulated-list-revert-hook 'list-dynamic-libraries--refresh nil t)
(tabulated-list-init-header)
(setq list-dynamic-libraries--loaded-only-p loaded-only-p)
(list-dynamic-libraries--refresh)
(tabulated-list-print))