Add new command apropos-function (Bug#41021)

* lisp/apropos.el (apropos-function): New command.
* etc/NEWS: Announce it.

diff --git a/etc/NEWS b/etc/NEWS
index db2374112ac5e274ab218d45fd3db18cfd8a4120..ddb42fbb4b68dfe6936f1698473825c55fc1009e 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -529,6 +529,9 @@ prefix on the Subject line in various languages.
 These new navigation commands are bound to 'n' and 'p' in
 'apropos-mode'.
 
+*** New command 'apropos-function'.
+This works like 'C-u M-x apropos-command' but is more discoverable.
+
 ** CC Mode
 
 *** Added support for Doxygen documentation style.

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 2566d44dfcf29d08083c6b64d2b644536e32eb39..6d8c7847b020eb173f36381bc15c1ea4b7cd6443 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -543,6 +543,20 @@ will be buffer-local when set."
                                  (and (local-variable-if-set-p symbol)
                                       (get symbol 'variable-documentation)))))
 
+;;;###autoload
+(defun apropos-function (pattern)
+  "Show functions that match PATTERN.
+
+PATTERN can be a word, a list of words (separated by spaces),
+or a regexp (using some regexp special characters).  If it is a word,
+search for matches for that word as a substring.  If it is a list of words,
+search for matches for any two (or more) of those words.
+
+This is the same as running `apropos-command' with a \\[universal-argument] prefix,
+or a non-nil `apropos-do-all' argument."
+  (interactive (list (apropos-read-pattern "function")))
+  (apropos-command pattern t))
+
 ;; For auld lang syne:
 ;;;###autoload
 (defalias 'command-apropos 'apropos-command)