emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/hyperdrive 55f38ce76c 2/2: Change: (hyperdrive-purge) Impr


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 55f38ce76c 2/2: Change: (hyperdrive-purge) Improve prompt
Date: Mon, 16 Oct 2023 19:00:36 -0400 (EDT)

branch: elpa/hyperdrive
commit 55f38ce76cfa72425275106cc8fcfd9b2cea56d0
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Change: (hyperdrive-purge) Improve prompt
---
 hyperdrive.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hyperdrive.el b/hyperdrive.el
index c13b6a71da..6c5b68022e 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -163,7 +163,7 @@ hyperdrive, the new hyperdrive's petname will be set to 
SEED."
 (defun hyperdrive-purge (hyperdrive)
   "Purge all data corresponding to HYPERDRIVE."
   (interactive (list (hyperdrive-complete-hyperdrive)))
-  (when (yes-or-no-p (format "Delete hyperdrive and all of its data: «%s»? "
+  (when (yes-or-no-p (format "Delete local copy of hyperdrive (data will 
likely not be recoverable—see manual): «%s»? "
                              (hyperdrive--format-hyperdrive hyperdrive)))
     (hyperdrive-purge-no-prompt hyperdrive
       :then (lambda (_response)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]