Mercurial > emacs

changeset 2756:5fb491f14ee2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 ed10207955a4
children a3ee51f30431
files src/keyboard.c
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
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