diff options
| author | Daanturo <daanturo@gmail.com> | 2022-11-25 00:06:37 +0700 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2022-11-25 09:02:16 +0100 |
| commit | bf93e94060d2c2b99bc9a16fa69d811bb8a454c1 (patch) | |
| tree | ee2ff2c83f2d749e7dc6080c7f3d12a3e37b5e0b | |
| parent | 4ee5618c6b1d53bc64edf6cf37adb8a0ffdacb0c (diff) | |
| download | emacs-bf93e94060d2c2b99bc9a16fa69d811bb8a454c1.tar.gz | |
Show package name in package-vc--unpack prompt
* lisp/emacs-lisp/package-vc.el (package-vc--unpack): Display the
package name when asking whether to overwrite its previous
checkout. (Bug#59548)
| -rw-r--r-- | lisp/emacs-lisp/package-vc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index bf1ea2bdf40..deb0debab4d 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -523,7 +523,7 @@ checkout. This overrides the `:branch' attribute in PKG-SPEC." (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 previous checkout for package `%s'?" 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) |