# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1190274697 0
# Node ID fd549372af1b3ae704256a783f8c2a68c555d86d
# Parent  f5e7e4e0fa669cb836989e51212bd52a45c922b4
(where_is_internal_1): If key is a cons, store the copy
in sequence.

diff -r f5e7e4e0fa66 -r fd549372af1b src/keymap.c
--- a/src/keymap.c	Thu Sep 20 07:49:52 2007 +0000
+++ b/src/keymap.c	Thu Sep 20 07:51:37 2007 +0000
@@ -2930,7 +2930,11 @@
       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))
     {