Mercurial > emacs
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 |