diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2011-06-21 12:04:28 +0200 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2011-06-21 12:04:28 +0200 |
| commit | ae9c04116ab15e45966de6663a5a79badd6d8ab5 (patch) | |
| tree | b3679149e9a36fe5f832674806698afae54d7e69 | |
| parent | 7f3f739fa4e1351a5b8a2dcd290f79c2e3baba38 (diff) | |
| download | emacs-ae9c04116ab15e45966de6663a5a79badd6d8ab5.tar.gz | |
lisp/misc.el (list-dynamic-libraries): Fix computation of header fields.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/misc.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a31868f4ed1..decf71a0abc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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. diff --git a/lisp/misc.el b/lisp/misc.el index e50b5b38c75..8087c7f5259 100644 --- a/lisp/misc.el +++ b/lisp/misc.el @@ -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)) |