diff options
| -rw-r--r-- | lisp/apropos.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index a51db667874..9adf987d941 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -432,6 +432,7 @@ found." "Click \\<apropos-local-map>\\[apropos-mouse-follow] to get full documentation.\n"))) (insert (substitute-command-keys "In this buffer, type \\<apropos-local-map>\\[apropos-follow] to get full documentation.\n\n")) + (use-local-map apropos-local-map) (while (consp p) (or (not spacing) (bobp) (terpri)) (setq apropos-item (car p) @@ -477,8 +478,7 @@ found." (apropos-print-doc 'describe-variable 2 "Variable" do-keys) (apropos-print-doc 'apropos-describe-plist 3 - "Plist" nil)) - (put-text-property 1 (point) 'local-map apropos-local-map))))) + "Plist" nil)))))) (prog1 apropos-accumulator (setq apropos-accumulator ()))) ; permit gc |