[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master a4e4ceb47a 02/42: Handle strings as keys in 'package-vc-ensure-pa
From: |
Philip Kaludercic |
Subject: |
master a4e4ceb47a 02/42: Handle strings as keys in 'package-vc-ensure-packages' |
Date: |
Thu, 17 Nov 2022 14:56:18 -0500 (EST) |
branch: master
commit a4e4ceb47a5579bba7d156ae5535ab02085534de
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>
Handle strings as keys in 'package-vc-ensure-packages'
* lisp/emacs-lisp/package-vc.el (package-vc-ensure-packages): Inter
sting keys while processing 'package-vc-selected-packages'.
As requested by Rudolf Adamkovič.
---
lisp/emacs-lisp/package-vc.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index 127a7e073f..505d258969 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -120,8 +120,9 @@ the `clone' function."
(defvar package-vc-selected-packages) ; pacify byte-compiler
(defun package-vc-ensure-packages ()
"Ensure packages specified in `package-vc-selected-packages' are installed."
- (pcase-dolist (`(,(and (pred symbolp) name) . ,spec)
- package-vc-selected-packages)
+ (pcase-dolist (`(,name . ,spec) package-vc-selected-packages)
+ (when (stringp name)
+ (setq name (intern name)))
(let ((pkg-desc (cadr (assoc name package-alist #'string=))))
(unless (and name (package-installed-p name)
(package-vc-p pkg-desc))
- master updated (2967356891 -> 17889dd828), Philip Kaludercic, 2022/11/17
- master e55be31d55 01/42: ; Fix interactive spec for 'package-vc-refresh', Philip Kaludercic, 2022/11/17
- master a4e4ceb47a 02/42: Handle strings as keys in 'package-vc-ensure-packages',
Philip Kaludercic <=
- master 9d3c6205ae 03/42: Rename '-ensure-packages' to -install-selected-packages', Philip Kaludercic, 2022/11/17
- master 83ff0de4ce 07/42: Fix 'package-vc-selected-packages' documentation, Philip Kaludercic, 2022/11/17
- master 3ff8310cc3 06/42: Mark 'package-vc-update' as interactive, Philip Kaludercic, 2022/11/17
- master 13d051b443 11/42: Remove references to internal symbols from public docstrings, Philip Kaludercic, 2022/11/17
- master e1ce202ad1 04/42: Mark 'package-vc-install-selected-packages' as interactive, Philip Kaludercic, 2022/11/17
- master 32758c6da0 08/42: Fix the docstring for 'package-vc--version', Philip Kaludercic, 2022/11/17
- master f939859fe4 09/42: Clarify 'package-vc--build-documentation' docstring, Philip Kaludercic, 2022/11/17
- master b0200a37e4 10/42: Expand 'package-vc--unpack-1' documentation, Philip Kaludercic, 2022/11/17
- master 2ec02024ab 14/42: Track 'default-directory' while updating source packages, Philip Kaludercic, 2022/11/17
- master d67b66f8ab 13/42: Respect :lisp-dir in package specs by loading a sub-directory, Philip Kaludercic, 2022/11/17