comparison lisp/emacs-lisp/package.el @ 111141:9f790d0f636f

Fix last commit.
author Chong Yidong <cyd@stupidchicken.com>
date Sun, 24 Oct 2010 11:39:32 -0400
parents 7aab0512e690
children 947164fbfa46
comparison
equal deleted inserted replaced
111140:7aab0512e690 111141:9f790d0f636f
1472 (defun package--generate-package-list () 1472 (defun package--generate-package-list ()
1473 "Populate the current Package Menu buffer." 1473 "Populate the current Package Menu buffer."
1474 (package-initialize) 1474 (package-initialize)
1475 (let ((inhibit-read-only t) 1475 (let ((inhibit-read-only t)
1476 info-list name desc hold builtin) 1476 info-list name desc hold builtin)
1477 (setq buffer-read-only t)
1478 (erase-buffer) 1477 (erase-buffer)
1479 ;; List installed packages 1478 ;; List installed packages
1480 (dolist (elt package-alist) 1479 (dolist (elt package-alist)
1481 (setq name (car elt)) 1480 (setq name (car elt))
1482 (when (and (not (eq name 'emacs)) ; Hide the `emacs' package. 1481 (when (and (not (eq name 'emacs)) ; Hide the `emacs' package.