Merge from emacs--devo--0

[gnu-emacs] / src / keyboard.c

diff --git a/src/keyboard.c b/src/keyboard.c
index 0f7a49d3832a8fa530577268253718bd9a4f024f..867a8d260241a4210fc3bc5996af5a9697229f50 100644 (file)
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -2354,6 +2354,9 @@ make_ctrl_char (c)
   /* Save the upper bits here.  */
   int upper = c & ~0177;
 
+  if (! ASCII_BYTE_P (c))
+    return c |= ctrl_modifier;
+
   c &= 0177;
 
   /* Everything in the columns containing the upper-case letters