(get_local_map): Call indirect-function.

diff --git a/src/intervals.c b/src/intervals.c
index 00c7395cbb08ff77b75c5250c017ea90129caa3a..0cc28ac2751141674e5e8a5ad6df2b4159e387ad 100644 (file)
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -1789,6 +1789,9 @@ get_local_map (position, buffer)
   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;