Mercurial > emacs

changeset 70397:a9473232a709

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Active Keymaps): Fix pseudo-Lisp syntax. (Searching Keymaps): Fix pseudo-Lisp description of keymap search.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 05 May 2006 12:27:06 +0000
parents 083f558fe283
children 5c3e7e42952a
files lispref/keymaps.texi
diffstat 1 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lispref/keymaps.texi	Fri May 05 12:10:24 2006 +0000
+++ b/lispref/keymaps.texi	Fri May 05 12:27:06 2006 +0000
@@ -561,7 +561,7 @@
             (@var{find-in-any} emulation-mode-map-alists)
             (@var{find-in-any} minor-mode-overriding-map-alist)
             (@var{find-in-any} minor-mode-map-alist)
-            (if (get-text-property (point) 'local-map))
+            (if (get-text-property (point) 'local-map)
                 (@var{find-in} (get-text-property (point) 'local-map))
               (@var{find-in} (current-local-map))))))
     (@var{find-in} (current-global-map)))
@@ -670,14 +670,15 @@
             (@var{find-in-any} emulation-mode-map-alists)
             (@var{find-in-any} minor-mode-overriding-map-alist)
             (@var{find-in-any} minor-mode-map-alist)
-            (@var{find-in} (get-text-property (point) 'local-map))
-            (@var{find-in} (current-local-map)))))
+            (if (get-text-property (point) 'local-map)
+                (@var{find-in} (get-text-property (point) 'local-map))
+              (@var{find-in} (current-local-map))))))
     (@var{find-in} (current-global-map)))
 @end lisp
 
 @noindent
 The @var{find-in} and @var{find-in-any} are pseudo functions that
-searches in one keymap respectively an alist of keymaps.
+search in one keymap and in an alist of keymaps, respectively.
 
 @enumerate
 @item