summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2014-07-15 21:45:19 +0100
committerAlan Pearce2014-07-15 21:45:19 +0100
commitf3345c44413ff7959d4895912672e5ac6f4e7453 (patch)
treeeb140fd27dcb6f4dd3f7de3c5d8df138619159e9
parente341b16cac679978b6171ca7a7bda61941a0ca99 (diff)
downloaddotfiles-f3345c44413ff7959d4895912672e5ac6f4e7453.tar.lz
dotfiles-f3345c44413ff7959d4895912672e5ac6f4e7453.tar.zst
dotfiles-f3345c44413ff7959d4895912672e5ac6f4e7453.zip
Emacs: define package-desc-archive, if it isn't
-rw-r--r--tag-emacs/emacs.d/init.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/tag-emacs/emacs.d/init.el b/tag-emacs/emacs.d/init.el
index 40f495e..e1352fc 100644
--- a/tag-emacs/emacs.d/init.el
+++ b/tag-emacs/emacs.d/init.el
@@ -54,6 +54,10 @@
   :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))))