From 96c97971ed6471272b2b197e234ad493e6ab1214 Mon Sep 17 00:00:00 2001 From: David Morgan Date: Tue, 5 Oct 2021 08:06:34 +0100 Subject: Ignore system packages when upgrading --- .emacs.d/lisp/init-packages.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to '.emacs.d/lisp') 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."))) -- cgit 1.4.1-2-gfad0