Mercurial > emacs
diff src/keyboard.c @ 2756:5fb491f14ee2
(make_lispy_event): Don't set shift modifier for C-^.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 13 May 1993 00:21:23 +0000 |
parents | 954251d0fbd1 |
children | 6ec57c1558da |
line wrap: on
line diff
--- a/src/keyboard.c Thu May 13 00:20:51 1993 +0000 +++ b/src/keyboard.c Thu May 13 00:21:23 1993 +0000 @@ -2093,7 +2093,10 @@ if ((event->modifiers & ctrl_modifier) && c >= 040) c |= ctrl_modifier; - if (XFASTINT (event->code) < 040 + /* Set the shift modifier for a control char + made from a shifted letter. But only for letters! */ + if (XFASTINT (event->code) >= 'A' - 0100 + && XFASTINT (event->code) <= 'Z' - 0100 && (event->modifiers & shift_modifier)) c |= shift_modifier; c |= (event->modifiers