# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 712991907 0
# Node ID c4dcdc9aed7016e15fe2fbfae869b9d0c663f17a
# Parent  7a14bb062617d02a24aae2e8963beed8c0d147f7
Clear the eighth bit of the character from the key sequence, NOT the
index of the character IN the key sequence.  How many tries will it
take to get it right?

diff -r 7a14bb062617 -r c4dcdc9aed70 src/keyboard.c
--- a/src/keyboard.c	Wed Aug 05 05:01:42 1992 +0000
+++ b/src/keyboard.c	Wed Aug 05 05:18:27 1992 +0000
@@ -2726,11 +2726,11 @@
 
 	      fkey_next =
 		get_keyelt (access_keymap
-			    (fkey_next, keybuf[(fkey_end++) & 0x7f]));
-
-	      /* If keybuf[fkey_start..fkey_next] is bound in the
+			    (fkey_next, keybuf[fkey_end++] & 0x7f));
+
+	      /* If keybuf[fkey_start..fkey_end] is bound in the
 		 function key map and it's a suffix of the current
-		 sequence (i.e. fkey_next == t), replace it with
+		 sequence (i.e. fkey_end == t), replace it with
 		 the binding and restart with fkey_start at the end. */
 	      if (XTYPE (fkey_next) == Lisp_Vector
 		  && fkey_end == t)