From: Philip Kaludercic Date: Sun, 23 Oct 2022 11:07:43 +0000 (+0200) Subject: ; Remove unnecessary 'let' binding X-Git-Tag: emacs-29.0.90~1616^2~307^2~40 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ab46a0df7b88c9c2d2af8dc528e775083bcbc936;p=emacs.git ; Remove unnecessary 'let' binding * lisp/emacs-lisp/package-vc.el (pacakge-vc-desc->spec): Simplify function. --- diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index 769f9ac5dc5..ba0f626e3e1 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -134,12 +134,11 @@ All other values are ignored.") "Retrieve the package specification for PKG-DESC. The optional argument NAME can be used to override the default name for PKG-DESC." - (let ((spec (alist-get - (or name (package-desc-name pkg-desc)) - (alist-get (intern (package-desc-archive pkg-desc)) - package-vc-archive-spec-alist) - nil nil #'string=))) - spec)) + (alist-get + (or name (package-desc-name pkg-desc)) + (alist-get (intern (package-desc-archive pkg-desc)) + package-vc-archive-spec-alist) + nil nil #'string=)) (define-inline package-vc-query-spec (pkg-desc prop) "Query the property PROP for the package specification for PKG-DESC.