Mercurial > emacs
comparison lisp/help.el @ 2079:51012c0f1227
(command-apropos): Print echo area message iff found symbols.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 09 Mar 1993 17:48:56 +0000 |
parents | 1ed971f67bfd |
children | b275e1b50542 |
comparison
equal
deleted
inserted
replaced
2078:4bf349812f55 | 2079:51012c0f1227 |
---|---|
379 documentation found." | 379 documentation found." |
380 (interactive "sCommand apropos (regexp): ") | 380 (interactive "sCommand apropos (regexp): ") |
381 (let ((message | 381 (let ((message |
382 (let ((standard-output (get-buffer-create "*Help*"))) | 382 (let ((standard-output (get-buffer-create "*Help*"))) |
383 (print-help-return-message 'identity)))) | 383 (print-help-return-message 'identity)))) |
384 (apropos string t 'commandp) | 384 (if (apropos string t 'commandp) |
385 (and message (message message)))) | 385 (and message (message message))))) |
386 | 386 |
387 (defun locate-library (library &optional nosuffix) | 387 (defun locate-library (library &optional nosuffix) |
388 "Show the full path name of Emacs library LIBRARY. | 388 "Show the full path name of Emacs library LIBRARY. |
389 This command searches the directories in `load-path' like `M-x load-library' | 389 This command searches the directories in `load-path' like `M-x load-library' |
390 to find the file that `M-x load-library RET LIBRARY RET' would load. | 390 to find the file that `M-x load-library RET LIBRARY RET' would load. |