]> git.eshelyaron.com Git - emacs.git/commitdiff
Handle package versions that are not version strings
authorPhilip Kaludercic <philipk@posteo.net>
Wed, 10 Jan 2024 08:25:41 +0000 (09:25 +0100)
committerEli Zaretskii <eliz@gnu.org>
Wed, 10 Jan 2024 13:59:56 +0000 (15:59 +0200)
* lisp/emacs-lisp/package.el (package-menu--version-predicate): Ignore
any errors raised by 'version-to-list', thus falling back to the
default version list.  (Bug#68317)

(cherry picked from commit eb913c7501489e1eae475cae843fccdf14cc24d8)

lisp/emacs-lisp/package.el

index c7769d5430c692aeb8c99a56eb2242a4ea4456f4..608306c825490de1590d94174d1550973e79ce62 100644 (file)
@@ -4003,8 +4003,8 @@ invocations."
 (defun package-menu--version-predicate (A B)
   "Predicate to sort \"*Packages*\" buffer by the version column.
 This is used for `tabulated-list-format' in `package-menu-mode'."
-  (let ((vA (or (version-to-list (aref (cadr A) 1)) '(0)))
-        (vB (or (version-to-list (aref (cadr B) 1)) '(0))))
+  (let ((vA (or (ignore-error error (version-to-list (aref (cadr A) 1))) '(0)))
+        (vB (or (ignore-error error (version-to-list (aref (cadr B) 1))) '(0))))
     (if (version-list-= vA vB)
         (package-menu--name-predicate A B)
       (version-list-< vA vB))))