(read_key_sequence): Fix downcasing of letters with

modifiers.

2 files changed, 4 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 2b7e7f8e3c3..57e5d831189 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2008-03-16  Andreas Schwab  <schwab@suse.de>
 
+        * keyboard.c (read_key_sequence): Fix downcasing of letters with
+        modifiers.
+
         * regex.c (re_match_2_internal): Correct matching of a charset
         against latin-1 characters.
 
diff --git a/src/keyboard.c b/src/keyboard.c
index 2acf6aaa3cc..16b9006b15f 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -10105,7 +10105,7 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last,
             XSETINT (new_key, XINT (key) & ~shift_modifier);
           else
             XSETINT (new_key, (DOWNCASE (XINT (key) & ~CHAR_MODIFIER_MASK)
-                               | (XINT (key) & ~CHAR_MODIFIER_MASK)));
+                               | (XINT (key) & CHAR_MODIFIER_MASK)));
 
           /* We have to do this unconditionally, regardless of whether
              the lower-case char is defined in the keymaps, because they