changeset 79872:63a2e3bc921c

(icomplete-get-keys): Look up KEYS using all maps in proper buffer.
author Richard M. Stallman <rms@gnu.org>
date Fri, 18 Jan 2008 03:17:20 +0000
parents 3c3f589ec4b6
children b774fe15b6e4
files lisp/icomplete.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/icomplete.el	Thu Jan 17 15:23:38 2008 +0000
+++ b/lisp/icomplete.el	Fri Jan 18 03:17:20 2008 +0000
@@ -147,8 +147,7 @@
     (save-excursion
       (let* ((sym (intern func-name))
 	     (buf (other-buffer nil t))
-	     (map (save-excursion (set-buffer buf) (current-local-map)))
-	     (keys (where-is-internal sym map)))
+	     (keys (with-current-buffer buf (where-is-internal sym))))
 	(if keys
 	    (concat "<"
 		    (mapconcat 'key-description