Finally make package-desc--keywords work

* lisp/emacs-lisp/package.el (package-desc--keywords): Use `nth'
  instead of `cdr'.
This commit is contained in:
Dmitry Gutov 2014-01-16 18:44:17 +02:00
parent 4d6df42066
commit 39903fd1fc
2 changed files with 3 additions and 2 deletions

View file

@ -390,7 +390,7 @@ Slots:
(defun package-desc--keywords (pkg-desc)
(let ((keywords (cdr (assoc :keywords (package-desc-extras pkg-desc)))))
(if (eq (car-safe keywords) 'quote)
(cdr keywords)
(nth 1 keywords)
keywords)))
;; Package descriptor format used in finder-inf.el and package--builtins.