* lisp/net/dictionary.el (context-menu-dictionary): Add autoload cookie.

(context-menu-functions): Remove context-menu-dictionary from hook (bug#50552)

diff --git a/lisp/net/dictionary.el b/lisp/net/dictionary.el
index 09d250fd7bf760fa9c0f98825f45c165f2e8c085..86447c2c351a14996a068e132e6fdcf3918a2a13 100644 (file)
--- a/lisp/net/dictionary.el
+++ b/lisp/net/dictionary.el
@@ -1375,8 +1375,12 @@ any buffer where (dictionary-tooltip-mode 1) has been called."
                  (current-word)))))
     (dictionary-search word)))
 
+;;;###autoload
 (defun context-menu-dictionary (menu click)
-  "Populate MENU with dictionary commands at CLICK."
+  "Populate MENU with dictionary commands at CLICK.
+When you add this function to `context-menu-functions',
+the context menu will contain an item that searches
+the word at mouse click."
   (when (thing-at-mouse click 'word)
     (define-key menu [dictionary-separator] menu-bar-separator)
     (define-key menu [dictionary-search-word-at-mouse]
@@ -1384,7 +1388,5 @@ any buffer where (dictionary-tooltip-mode 1) has been called."
                   :help "Search the word at mouse click in dictionary")))
   menu)
 
-(add-hook 'context-menu-functions 'context-menu-dictionary 15)
-
 (provide 'dictionary)
 ;;; dictionary.el ends here