Emacs: define package-desc-archive, if it isn't
1 file changed, 4 insertions(+), 0 deletions(-)
jump to
M tag-emacs/emacs.d/init.el → tag-emacs/emacs.d/init.el
@@ -54,6 +54,10 @@ :defer t :config (progn (setq paradox-automatically-star nil))) +(if (not (fboundp #'package-desc-archive)) + (defsubst package-desc-archive (desc) + (aref desc (1- (length desc))))) + (defun package-list-installed () (loop for pkg in package-activated-list collect (cadr (assq pkg package-archive-contents))))