mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

Finally make package-desc--keywords work

Browse Source 
* 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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -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>

2
lisp/emacs-lisp/package.el
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.