Mercurial > emacs
comparison src/keyboard.c @ 18778:7626e0d30719
(make_lispy_event): Distinguish S-SPC from SPC.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 14 Jul 1997 19:36:01 +0000 |
parents | c5e0b32380c1 |
children | c24b5da01b1f |
comparison
equal
deleted
inserted
replaced
18777:c5e0b32380c1 | 18778:7626e0d30719 |
---|---|
3697 just above, and the shift key was taken care of by the X code, | 3697 just above, and the shift key was taken care of by the X code, |
3698 and applied to control characters by make_ctrl_char. */ | 3698 and applied to control characters by make_ctrl_char. */ |
3699 c |= (event->modifiers | 3699 c |= (event->modifiers |
3700 & (meta_modifier | alt_modifier | 3700 & (meta_modifier | alt_modifier |
3701 | hyper_modifier | super_modifier)); | 3701 | hyper_modifier | super_modifier)); |
3702 /* Distinguish Shift-SPC from SPC. */ | |
3703 if ((event->code & 0377) == 040 | |
3704 && event->modifiers & shift_modifier) | |
3705 c |= shift_modifier; | |
3702 button_down_time = 0; | 3706 button_down_time = 0; |
3703 XSETFASTINT (lispy_c, c); | 3707 XSETFASTINT (lispy_c, c); |
3704 return lispy_c; | 3708 return lispy_c; |
3705 } | 3709 } |
3706 | 3710 |