Function: dictionary-search
dictionary-search is an autoloaded, interactive and byte-compiled
function defined in dictionary.el.gz.
Signature
(dictionary-search WORD &optional DICTIONARY)
Documentation
Search the WORD in DICTIONARY if given or in all if nil.
It presents the selection or word at point as default input and allows editing it.
Probably introduced at or before Emacs version 28.1.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/net/dictionary.el.gz
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; User callable commands
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;###autoload
(defun dictionary-search (word &optional dictionary)
"Search the WORD in DICTIONARY if given or in all if nil.
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: ")
nil 'dictionary-word-history default))
(if current-prefix-arg
(read-string (if dictionary-default-dictionary
(format "Dictionary (%s): " dictionary-default-dictionary)
"Dictionary: ")
nil nil dictionary-default-dictionary)
dictionary-default-dictionary)))
;; if called by pressing the button
(unless word
(setq word (read-string "Search word: " nil 'dictionary-word-history)))
;; just in case non-interactively called
(unless dictionary
(setq dictionary dictionary-default-dictionary))
(dictionary-new-search (cons word dictionary)))