* keymap.c (Fwhere_is_internal): Don't test CONSP (sequences) unnecessarily.

2 files changed, 3 insertions, 2 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 9f770df40e..8efad3a59d 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,7 @@
 	* keymap.c (keymap_parent, keymap_memberp, map_keymap_internal):
 	(copy_keymap_item, append_key, push_text_char_description):
 	Now static.
+	(Fwhere_is_internal): Don't test CONSP (sequences) unnecessarily.
 
 	* keyboard.c: Declare functions static if they are not used elsewhere.
 	(echo_char, echo_dash, cmd_error, top_level_2):
diff --git a/src/keymap.c b/src/keymap.c
index cbb6adf3a0..05d9616ef2 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -2774,8 +2774,8 @@ remapped command in the returned list.  */)
 	    considered remapped sequences yet, copy them over and
 	    process them.  */
 	 || (!remapped && (sequences = remapped_sequences,
-			   remapped = 1),
-	     CONSP (sequences)))
+			   remapped = 1,
+			   CONSP (sequences))))
     {
       Lisp_Object sequence, function;