(where_is_internal_1): If key is a cons, store the copy
authorKenichi Handa <handa@m17n.org>
Thu, 20 Sep 2007 07:51:37 +0000 (07:51 +0000)
committerKenichi Handa <handa@m17n.org>
Thu, 20 Sep 2007 07:51:37 +0000 (07:51 +0000)
in sequence.

src/keymap.c

index bfc8161..7f329cc 100644 (file)
@@ -2930,7 +2930,11 @@ where_is_internal_1 (key, binding, args, data)
       Faset (sequence, last, make_number (XINT (key) | meta_modifier));
     }
   else
-    sequence = append_key (this, key);
+    {
+      if (CONSP (key))
+       key = Fcons (XCAR (key), XCDR (key));
+      sequence = append_key (this, key);
+    }
 
   if (!NILP (where_is_cache))
     {