comparison src/keyboard.c @ 939:c4dcdc9aed70

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?
author Jim Blandy <jimb@redhat.com>
date Wed, 05 Aug 1992 05:18:27 +0000
parents ef5f79a6535a
children eb74884fc95a
comparison
equal deleted inserted replaced
938:7a14bb062617 939:c4dcdc9aed70
2724 else 2724 else
2725 fkey_next = fkey_map; 2725 fkey_next = fkey_map;
2726 2726
2727 fkey_next = 2727 fkey_next =
2728 get_keyelt (access_keymap 2728 get_keyelt (access_keymap
2729 (fkey_next, keybuf[(fkey_end++) & 0x7f])); 2729 (fkey_next, keybuf[fkey_end++] & 0x7f));
2730 2730
2731 /* If keybuf[fkey_start..fkey_next] is bound in the 2731 /* If keybuf[fkey_start..fkey_end] is bound in the
2732 function key map and it's a suffix of the current 2732 function key map and it's a suffix of the current
2733 sequence (i.e. fkey_next == t), replace it with 2733 sequence (i.e. fkey_end == t), replace it with
2734 the binding and restart with fkey_start at the end. */ 2734 the binding and restart with fkey_start at the end. */
2735 if (XTYPE (fkey_next) == Lisp_Vector 2735 if (XTYPE (fkey_next) == Lisp_Vector
2736 && fkey_end == t) 2736 && fkey_end == t)
2737 { 2737 {
2738 t = fkey_start + XVECTOR (fkey_next)->size; 2738 t = fkey_start + XVECTOR (fkey_next)->size;