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

[Juri Linkov]

branch: master
commit 7926cf73414d93700119f6138429a1347bb797fa
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>

    * lisp/net/dictionary.el (dictionary-search): Use format-prompt.
---
 lisp/net/dictionary.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lisp/net/dictionary.el b/lisp/net/dictionary.el
index b8f5018005..d381750eb0 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