bug#59548: [PATCH] Include the package name in package-vc--unpack's prompt

[Stefan Kangas]

daanturo <daanturo@gmail.com> writes:

> Tags: patch
>
> Make the prompt a bit more informative, as sometimes I am presented with
> this question at startup without even knowing the cause.

LGTM.  Philip, WDYT?

> From dba6787f0cb1e92f3c9eb62b1f7d9ab6599c43a1 Mon Sep 17 00:00:00 2001
> From: Daanturo <daanturo@gmail.com>
> Date: Fri, 25 Nov 2022 00:06:37 +0700
> Subject: [PATCH] More informant prompt for package-vc--unpack
>
> * lisp/emacs-lisp/package-vc.el (package-vc--unpack): show the package's
> name while asking whether to overwrite its previous checkout.
> ---
>  lisp/emacs-lisp/package-vc.el | 2 +-
>  1 file changed, 1 insertion(+), 1 deletion(-)
>
> diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
> index bf1ea2bdf4..a9c1bbfe60 100644
> --- a/lisp/emacs-lisp/package-vc.el
> +++ b/lisp/emacs-lisp/package-vc.el
> @@ -523,7 +523,7 @@ package-vc--unpack
>                 (pkg-dir (expand-file-name dirname package-user-dir)))
>      (setf (package-desc-dir pkg-desc) pkg-dir)
>      (when (file-exists-p pkg-dir)
> -      (if (yes-or-no-p "Overwrite previous checkout?")
> +      (if (yes-or-no-p (format "Overwrite %s's previous checkout?" name))
>            (package--delete-directory pkg-dir)
>          (error "There already exists a checkout for %s" name)))
>      (package-vc--clone pkg-desc pkg-spec pkg-dir rev)