Mercurial > emacs
comparison src/keyboard.c @ 43440:29dc2ac9c886
(kbd_buffer_get_event) [WINDOWSNT]: Corrected
composing of language-change event.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 20 Feb 2002 23:00:35 +0000 |
parents | 27bc3e253caf |
children | d42084cd7d73 |
comparison
equal
deleted
inserted
replaced
43439:dffc7bf6189c | 43440:29dc2ac9c886 |
---|---|
3719 #ifdef WINDOWSNT | 3719 #ifdef WINDOWSNT |
3720 else if (event->kind == language_change_event) | 3720 else if (event->kind == language_change_event) |
3721 { | 3721 { |
3722 /* Make an event (language-change (FRAME CHARSET LCID)). */ | 3722 /* Make an event (language-change (FRAME CHARSET LCID)). */ |
3723 obj = Fcons (event->modifiers, Qnil); | 3723 obj = Fcons (event->modifiers, Qnil); |
3724 obj = Fcons (event->code, Qnil); | 3724 obj = Fcons (event->code, obj); |
3725 obj = Fcons (event->frame_or_window, obj); | 3725 obj = Fcons (event->frame_or_window, obj); |
3726 obj = Fcons (Qlanguage_change, Fcons (obj, Qnil)); | 3726 obj = Fcons (Qlanguage_change, Fcons (obj, Qnil)); |
3727 kbd_fetch_ptr = event + 1; | 3727 kbd_fetch_ptr = event + 1; |
3728 } | 3728 } |
3729 #endif | 3729 #endif |