From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 7 Jul 1995 18:54:22 +0000 (+0000)
Subject: (command-apropos): Deleted function.  This is replaced by
X-Git-Tag: emacs-19.34~3360
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=95b7ed4801dcf942ddac4a752160663c311706f2;p=emacs.git

(command-apropos): Deleted function.  This is replaced by
apropos-command in apropos.el.
---

diff --git a/lisp/help.el b/lisp/help.el
index 3275689fb1f..c51c027863c 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -577,18 +577,6 @@ Argument is a command definition, usually a symbol with a function definition."
       (message "%s is not on any key" definition)))
   nil)
 
-(defun command-apropos (string)
-  "Like apropos but lists only symbols that are names of commands
-\(interactively callable functions).  Argument REGEXP is a regular expression
-that is matched against command symbol names.  Returns list of symbols and
-documentation found."
-  (interactive "sCommand apropos (regexp): ")
-  (let ((message
-	 (let ((standard-output (get-buffer-create "*Help*")))
-	   (print-help-return-message 'identity))))
-    (if (apropos string t 'commandp t)
-	(and message (message message)))))
-
 (defun locate-library (library &optional nosuffix)
   "Show the full path name of Emacs library LIBRARY.
 This command searches the directories in `load-path' like `M-x load-library'