From: Juri Linkov <juri@linkov.net>
Date: Sat, 5 Nov 2022 17:34:47 +0000 (+0200)
Subject: * lisp/net/dictionary.el (dictionary-search): Use format-prompt.
X-Git-Tag: emacs-29.0.90~1616^2~280
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7926cf73414d93700119f6138429a1347bb797fa;p=emacs.git

* lisp/net/dictionary.el (dictionary-search): Use format-prompt.
---

diff --git a/lisp/net/dictionary.el b/lisp/net/dictionary.el
index b8f5018005b..d381750eb00 100644
--- a/lisp/net/dictionary.el
+++ b/lisp/net/dictionary.el
@@ -1150,9 +1150,7 @@ It presents the selection or word at point as default input and
 allows editing it."
   (interactive
    (list (let ((default (dictionary-search-default)))
-           (read-string (if default
-                            (format "Search word (%s): " default)
-                          "Search word: ")
+           (read-string (format-prompt "Search word" default)
                         nil 'dictionary-word-history default))
 	 (if current-prefix-arg
 	     (read-string (if dictionary-default-dictionary