Add new context menu functions to the context-menu-functions type

* lisp/mouse.el (context-menu-functions): Add new menu functions
to the defcustom type list (bug#52973).

diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el
index d7d98c78f86b9deed2728078ab7b6f3101e7c345..b70d4a7569060b949b9aff12478bf04a43981382 100644 (file)
--- a/lisp/hi-lock.el
+++ b/lisp/hi-lock.el
@@ -862,6 +862,7 @@ SPACES-REGEXP is a regexp to substitute spaces in font-lock search."
     (mouse-set-point event)
     (highlight-symbol-at-point)))
 
+;;;###autoload
 (defun hi-lock-context-menu (menu click)
   "Populate MENU with a menu item to highlight symbol at CLICK."
   (save-excursion

diff --git a/lisp/man.el b/lisp/man.el
index d94cbf201532d179ded0c60cc2985a09df0b3bfd..d6146a2c4dc8dd104eaeab482539bf9eabad7898 100644 (file)
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -1984,6 +1984,7 @@ Uses `Man-name-local-regexp'."
     (mouse-set-point e)
     (man (Man-default-man-entry))))
 
+;;;###autoload
 (defun Man-context-menu (menu click)
   "Populate MENU with commands that open a man page at point."
   (save-excursion

diff --git a/lisp/mouse.el b/lisp/mouse.el
index cfe212c3e9b7cdc107307b5c93403c5ace7e36c9..46dd0397d7f15a752851f7a1a5d7dbfaa8eea4cf 100644 (file)
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -298,6 +298,9 @@ and should return the same menu with changes such as added new menu items."
                   (function-item context-menu-buffers)
                   (function-item context-menu-vc)
                   (function-item context-menu-ffap)
+                  (function-item Man-context-menu)
+                  (function-item hi-lock-context-menu)
+                  (function-item context-menu-online-search)
                   (function :tag "Custom function")))
   :version "28.1")