diff options
author | Philip Kaludercic <philipk@posteo.net> | 2022-10-16 13:37:29 +0200 |
---|---|---|
committer | Philip Kaludercic <philipk@posteo.net> | 2022-10-16 13:40:24 +0200 |
commit | 5134eb02cf5cda16455e1b59b29ec82d491b115e (patch) | |
tree | 80e289cd697bfed154535382d1b6bbb0cd42ef5b /lisp/emacs-lisp | |
parent | 3f7e746b514759b66c28d30ead24be08f0e01717 (diff) | |
download | emacs-5134eb02cf5cda16455e1b59b29ec82d491b115e.tar.gz emacs-5134eb02cf5cda16455e1b59b29ec82d491b115e.tar.bz2 emacs-5134eb02cf5cda16455e1b59b29ec82d491b115e.zip |
Mark source packages as always updatable
* lisp/emacs-lisp/package.el (package--updateable-packages): Add check
for source packages.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/package.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 6c92ff0ba74..245e41ee74a 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -2249,12 +2249,13 @@ to install it but still mark it as selected." #'car (seq-filter (lambda (elt) - (let ((available - (assq (car elt) package-archive-contents))) - (and available - (version-list-< - (package-desc-version (cadr elt)) - (package-desc-version (cadr available)))))) + (or (let ((available + (assq (car elt) package-archive-contents))) + (and available + (version-list-< + (package-desc-version (cadr elt)) + (package-desc-version (cadr available))))) + (package-vc-p (cadr (assq (car elt) package-alist))))) package-alist))) ;;;###autoload |