summaryrefslogtreecommitdiff
path: root/lisp/apropos.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-09-11 03:39:04 +0000
committerGlenn Morris <rgm@gnu.org>2009-09-11 03:39:04 +0000
commit4a6c9bec5a70ef99bf50bd26abbe9cfda1dfe8c4 (patch)
tree314dc82139eab44f0b6b0ed2f03dcfdf928e5e5f /lisp/apropos.el
parent7ab5d780043b08bfb2dfb3fa0656f155681ded64 (diff)
downloademacs-4a6c9bec5a70ef99bf50bd26abbe9cfda1dfe8c4.tar.gz
(apropos-documentation-check-doc-file): Exclude unbound functions and
variables, since they must be stuff specific to some other platform. (apropos-print): Make mouse-click message less specific about button.
Diffstat (limited to 'lisp/apropos.el')
-rw-r--r--lisp/apropos.el12
1 files changed, 9 insertions, 3 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el
index 68721eb05a8..117eeb8267e 100644
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -840,7 +840,14 @@ Returns list of symbols and documentation found."
3) ; variable documentation
symbol (read)
doc (buffer-substring (1+ (point)) (1- sepb)))
- (when (apropos-true-hit-doc doc)
+ (when (and (apropos-true-hit-doc doc)
+ ;; The DOC file lists all built-in funcs and vars.
+ ;; If any are not currently bound, they can
+ ;; only be platform-specific stuff (eg NS) not
+ ;; in use on the current platform.
+ ;; So we exclude them.
+ (cond ((= 3 type) (boundp symbol))
+ ((= 2 type) (fboundp symbol))))
(or (and (setq apropos-item (assq symbol apropos-accumulator))
(setcar (cdr apropos-item)
(apropos-score-doc doc)))
@@ -976,8 +983,7 @@ If non-nil TEXT is a string that will be printed as a heading."
(insert
"If moving the mouse over text changes the text's color, "
"you can click\n"
- "mouse-2 (second button from right) on that text to "
- "get more information.\n"))
+ "or press return on that text to get more information.\n"))
(insert "In this buffer, go to the name of the command, or function,"
" or variable,\n"
(substitute-command-keys