summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--.config/emacs/init.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index 7857df0..3d9b807 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -504,8 +504,11 @@ related hooks."
(dolist (dir-to-delete x-dirs-to-delete)
(when (and (stringp dir-to-delete)
(file-exists-p dir-to-delete)
- (y-or-n-p (format-prompt "Also delete directory `%s'?" nil
- (directory-file-name dir-to-delete))))
+ (thread-last
+ (directory-file-name dir-to-delete)
+ (format-prompt "Also delete directory `%s'?" nil)
+ (string-remove-suffix ": ")
+ (y-or-n-p)))
(delete-directory dir-to-delete)))))
(defun x-remove-auto-directory-hooks ()