From f587d7acaca04810653399b332ff012535481592 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 21 Nov 1995 00:10:57 +0000 Subject: [PATCH] (apropos-print): Use apropos-local-map as buffer's map, not as a text property. --- lisp/apropos.el | 4 ++-- 1 file 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-mouse-follow] to get full documentation.\n"))) (insert (substitute-command-keys "In this buffer, type \\\\[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 -- 2.39.2