From: Philip Kaludercic <philipk@posteo.net>
Date: Sun, 16 Oct 2022 11:37:29 +0000 (+0200)
Subject: Mark source packages as always updatable
X-Git-Tag: emacs-29.0.90~1616^2~307^2~55
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5134eb02cf5cda16455e1b59b29ec82d491b115e;p=emacs.git

Mark source packages as always updatable

* lisp/emacs-lisp/package.el (package--updateable-packages): Add check
for source packages.
---

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