From 4d8d123236fb46882431ccae0416a06f24b08463 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 4 Jan 2025 14:18:54 +0200 Subject: [PATCH] Fix documentation and prompt in 'package-isolate' * lisp/emacs-lisp/package.el (package-isolate): Fix doc string and the prompt. (Bug#75163) (cherry picked from commit 4b2bb63b7ac386daabb0bbd2dc00fb542a9bcc21) --- lisp/emacs-lisp/package.el | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index de18ab2d55c..ef502314e3d 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -2651,16 +2651,23 @@ argument, don't ask for confirmation to install packages." (defun package-isolate (packages &optional temp-init) "Start an uncustomized Emacs and only load a set of PACKAGES. +Interactively, prompt for PACKAGES to load, which should be specified +separated by commas. +If called from Lisp, PACKAGES should be a list of packages to load. If TEMP-INIT is non-nil, or when invoked with a prefix argument, -the Emacs user directory is set to a temporary directory." +the Emacs user directory is set to a temporary directory. +This command is intended for testing Emacs and/or the packages +in a clean environment." (interactive (cl-loop for p in (cl-loop for p in (package--alist) append (cdr p)) unless (package-built-in-p p) collect (cons (package-desc-full-name p) p) into table finally return - (list (cl-loop for c in (completing-read-multiple - "Isolate packages: " table - nil t) + (list + (cl-loop for c in + (completing-read-multiple + "Packages to isolate, as comma-separated list: " table + nil t) collect (alist-get c table nil nil #'string=)) current-prefix-arg))) (let* ((name (concat "package-isolate-" -- 2.39.5