comparison src/keyboard.c @ 37742:c3dd00963b46

(read_key_sequence): Prevent generating a fake prefix key twice.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 15 May 2001 13:37:45 +0000
parents 4fe5b946a4af
children fd7c0dac2110 7255d1f70b82
comparison
equal deleted inserted replaced
37741:7b449aec29d2 37742:c3dd00963b46
8219 Lisp_Object window, posn; 8219 Lisp_Object window, posn;
8220 8220
8221 window = POSN_WINDOW (EVENT_START (key)); 8221 window = POSN_WINDOW (EVENT_START (key));
8222 posn = POSN_BUFFER_POSN (EVENT_START (key)); 8222 posn = POSN_BUFFER_POSN (EVENT_START (key));
8223 8223
8224 if (CONSP (posn)) 8224 if (CONSP (posn)
8225 || (!NILP (fake_prefixed_keys)
8226 && !NILP (Fmemq (key, fake_prefixed_keys))))
8225 { 8227 {
8226 /* We're looking at the second event of a 8228 /* We're looking a second time at an event for which
8227 sequence which we expanded before. Set 8229 we generated a fake prefix key. Set
8228 last_real_key_start appropriately. */ 8230 last_real_key_start appropriately. */
8229 if (t > 0) 8231 if (t > 0)
8230 last_real_key_start = t - 1; 8232 last_real_key_start = t - 1;
8231 } 8233 }
8232 8234