From 513c5d827decf474f923f6f66abd2ed62e0e64f0 Mon Sep 17 00:00:00 2001 From: Robert Pluim Date: Fri, 2 Sep 2022 15:09:48 +0200 Subject: [PATCH] Use `format-prompt' in `describe-char-fold-equivalences' * lisp/char-fold.el (describe-char-fold-equivalences): Use `format-prompt'. --- lisp/char-fold.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/char-fold.el b/lisp/char-fold.el index 2ac4cb0543a..43e3cd45ecb 100644 --- a/lisp/char-fold.el +++ b/lisp/char-fold.el @@ -439,7 +439,9 @@ non-nil, means also include partially matching ligatures and non-canonical equivalences." (interactive (list (ignore-errors (read-char-by-name - "Unicode name, single char, or hex, default all: " t)) + (format-prompt "Unicode name, single char, or hex" + "all") + t)) current-prefix-arg)) (require 'help-fns) (let ((help-buffer-under-preparation t)) -- 2.39.2