From ab46a0df7b88c9c2d2af8dc528e775083bcbc936 Mon Sep 17 00:00:00 2001 From: Philip Kaludercic Date: Sun, 23 Oct 2022 13:07:43 +0200 Subject: [PATCH] ; Remove unnecessary 'let' binding * lisp/emacs-lisp/package-vc.el (pacakge-vc-desc->spec): Simplify function. --- lisp/emacs-lisp/package-vc.el | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) 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. -- 2.39.5