# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 841851646 0
# Node ID f38128a8bb2b88875f3bbf2140267369feeba7bc
# Parent  ec5f48fe0320a6c7fdc6354be19ae31255828268
(get_local_map): Call indirect-function.

diff -r ec5f48fe0320 -r f38128a8bb2b src/intervals.c
--- a/src/intervals.c	Wed Sep 04 15:38:37 1996 +0000
+++ b/src/intervals.c	Wed Sep 04 15:40:46 1996 +0000
@@ -1789,6 +1789,9 @@
   BUF_ZV (buffer) = old_zv;
 
   /* Use the local map only if it is valid.  */
+  /* Do allow symbols that are defined as keymaps.  */
+  if (SYMBOLP (prop) && !NILP (prop))
+    prop = Findirect_function (prop);
   if (!NILP (prop)
       && (tem = Fkeymapp (prop), !NILP (tem)))
     return prop;