about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorDavid Morgan <djm_uk@protonmail.com>2021-10-05 08:06:34 +0100
committerDavid Morgan <djm_uk@protonmail.com>2021-10-05 08:06:34 +0100
commit96c97971ed6471272b2b197e234ad493e6ab1214 (patch)
tree8d7d2e002e9b9c924fec96962bc2d2242886deb3
parent2d6a4c49bafea9a766464492bcfc4a7f2e196c6e (diff)
downloaddotfiles-96c97971ed6471272b2b197e234ad493e6ab1214.tar.gz
Ignore system packages when upgrading
-rw-r--r--.emacs.d/lisp/init-packages.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/.emacs.d/lisp/init-packages.el b/.emacs.d/lisp/init-packages.el
index 8c43e82..70dc5e8 100644
--- a/.emacs.d/lisp/init-packages.el
+++ b/.emacs.d/lisp/init-packages.el
@@ -49,10 +49,13 @@
 
 (use-package epl
   :config
+  (defvar my/system-packages '("vterm"))
   (defun my/upgrade-packages ()
     (interactive)
     (epl-refresh)
-    (epl-upgrade)
+    (when-let ((upgrades (seq-filter (lambda (p) (not (member (epl-package-name p) my/system-packages)))
+                                     (mapcar 'epl-upgrade-available (epl-find-upgrades)))))
+      (epl-upgrade upgrades))
     (fetch-vertico-extensions)
     (message "Package upgrade finished.")))