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

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

[nongnu] elpa/hyperdrive be533a1d19: Change: (hyperdrive-purge) Always p


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive be533a1d19: Change: (hyperdrive-purge) Always prompt for hyperdrive
Date: Tue, 7 Nov 2023 01:00:13 -0500 (EST)

branch: elpa/hyperdrive
commit be533a1d1988f28ac73d496e863983d0c80a295c
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

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

diff --git a/hyperdrive.el b/hyperdrive.el
index c94e1c97a9..6734097dda 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -162,7 +162,7 @@ hyperdrive, the new hyperdrive's petname will be set to 
SEED."
 ;;;###autoload
 (defun hyperdrive-purge (hyperdrive)
   "Purge all data corresponding to HYPERDRIVE."
-  (interactive (list (hyperdrive-complete-hyperdrive)))
+  (interactive (list (hyperdrive-complete-hyperdrive :force-prompt t)))
   (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



reply via email to

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