Finally make package-desc--keywords work
* lisp/emacs-lisp/package.el (package-desc--keywords): Use `nth' instead of `cdr'.
This commit is contained in:
parent
4d6df42066
commit
39903fd1fc
2 changed files with 3 additions and 2 deletions
|
@ -1,7 +1,8 @@
|
|||
2014-01-16 Dmitry Gutov <dgutov@yandex.ru>
|
||||
|
||||
* emacs-lisp/package.el (package-desc--keywords): Use `cdr' with
|
||||
`assoc'. Make private. Update all callers.
|
||||
`assoc'. Use `nth' instead of `cdr'. Make private. Update all
|
||||
callers.
|
||||
|
||||
2014-01-16 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
|
|
|
@ -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.
|
||||
|
|
Loading…
Add table
Reference in a new issue