(where_is_internal_1): If key is a cons, store the copy

in sequence.

1 files changed, 5 insertions, 1 deletions

diff --git a/src/keymap.c b/src/keymap.c
index bfc81614245..7f329cc9a1a 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -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))
     {