]> 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)
committerPhilip Kaludercic <philipk@posteo.net>
Wed, 10 Jan 2024 08:25:41 +0000 (09:25 +0100)
* 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)

lisp/emacs-lisp/package.el

index b21e0f8fc51450fa2fafc9b63bf513fa3bdff556..868373f46c2e886aae4e7c8c37faf007a3cf6027 100644 (file)
@@ -4069,8 +4069,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))))