diff options
| author | Thomas Voss <mail@thomasvoss.com> | 2024-09-09 23:56:23 +0200 |
|---|---|---|
| committer | Thomas Voss <mail@thomasvoss.com> | 2024-09-09 23:56:23 +0200 |
| commit | 8db0d840836db9f83427e9375e5ff1c7482e6fb5 (patch) | |
| tree | c791dd09ce5dfbd769ce183919c742c9bea7d1d7 /.config/emacs/init.el | |
| parent | 9ccbe7fa5754cc75c5fe8248ff167c9cbf6772ec (diff) | |
emacs: Prefer ‘format-prompt’
Diffstat (limited to '.config/emacs/init.el')
| -rw-r--r-- | .config/emacs/init.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el index 9db3109..2ad75d9 100644 --- a/.config/emacs/init.el +++ b/.config/emacs/init.el @@ -166,7 +166,8 @@ it convenient to use in ‘thread-last’." (list (car range) (cadr range) (concat "\\(\\s-*\\)" - (read-string "Align regexp: ")) + (read-string + (format-prompt "Align regexp" nil))) (y-or-n-p "Repeat? ")))) (align-regexp start end regexp 1 1 repeat)) @@ -510,8 +511,8 @@ 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 "Also delete directory ‘%s’?" - (directory-file-name dir-to-delete)))) + (y-or-n-p (format-prompt "Also delete directory `%s'?" nil + (directory-file-name dir-to-delete)))) (delete-directory dir-to-delete))))) (defun x-remove-auto-directory-hooks () |