summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/package-vc.el
diff options
context:
space:
mode:
authorPhilip Kaludercic <philipk@posteo.net>2022-10-30 14:07:56 +0100
committerPhilip Kaludercic <philipk@posteo.net>2022-10-30 14:07:56 +0100
commit8b49d553b655ea589c80ac1de955e9c4d65627d3 (patch)
tree52d61c67dad1a14f8f365f88331bfb61f824c444 /lisp/emacs-lisp/package-vc.el
parent30f1e7c1e93dda496412f76f70b2f49b30407b11 (diff)
downloademacs-8b49d553b655ea589c80ac1de955e9c4d65627d3.tar.gz
emacs-8b49d553b655ea589c80ac1de955e9c4d65627d3.tar.bz2
emacs-8b49d553b655ea589c80ac1de955e9c4d65627d3.zip
; Avoid a type error on malformed "elpa-packages.eld" input
* lisp/emacs-lisp/package-vc.el: Use 'eq' instead of '='
Diffstat (limited to 'lisp/emacs-lisp/package-vc.el')
-rw-r--r--lisp/emacs-lisp/package-vc.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index 65979897777..ab1bffdd21d 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -203,8 +203,8 @@ This function is meant to be used as a hook for
;; :version 1
;; :default-vc Git)
(let ((spec (read (current-buffer))))
- (when (= package-vc-elpa-packages-version
- (plist-get (cdr spec) :version))
+ (when (eq package-vc-elpa-packages-version
+ (plist-get (cdr spec) :version))
(setf (alist-get (intern archive) package-vc-archive-spec-alist)
(car spec)))
(setf (alist-get (intern archive) package-vc-archive-data-alist)