emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r104656: lisp/misc.el (list-dynamic-l


From: Juanma Barranquero
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r104656: lisp/misc.el (list-dynamic-libraries): Fix computation of header fields.
Date: Tue, 21 Jun 2011 12:04:28 +0200
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 104656
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Tue 2011-06-21 12:04:28 +0200
message:
  lisp/misc.el (list-dynamic-libraries): Fix computation of header fields.
modified:
  lisp/ChangeLog
  lisp/misc.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-06-21 08:55:22 +0000
+++ b/lisp/ChangeLog    2011-06-21 10:04:28 +0000
@@ -1,3 +1,8 @@
+2011-06-21  Juanma Barranquero  <address@hidden>
+
+       * misc.el (list-dynamic-libraries--refresh): Compute header here...
+       (list-dynamic-libraries): ...not here.
+
 2011-06-21  Leo Liu  <address@hidden>
 
        * subr.el (sha1): Implement sha1 using secure-hash.

=== modified file 'lisp/misc.el'
--- a/lisp/misc.el      2011-05-09 23:57:40 +0000
+++ b/lisp/misc.el      2011-06-21 10:04:28 +0000
@@ -151,6 +151,7 @@
           (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 @@
     (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))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]