Merged in changes from CVS trunk.

Patches applied:

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-330
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-331
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-332
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-333
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-334
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-335
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-336
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-337
   Update from CVS

 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-338
   Update from CVS


git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-173

1 files changed, 6 insertions, 0 deletions

diff --git a/src/casefiddle.c b/src/casefiddle.c
index ae60d2c8dd5..6387c4bc845 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -52,6 +52,12 @@ casify_object (flag, obj)
                           | CHAR_SHIFT | CHAR_CTL | CHAR_META);
           int flags = XINT (obj) & flagbits;
 
+          /* If the character has higher bits set
+             above the flags, return it unchanged.
+             It is not a real character.  */
+          if ((unsigned) XFASTINT (obj) > (unsigned) flagbits)
+            return obj;
+
           c = DOWNCASE (XFASTINT (obj) & ~flagbits);
           if (inword)
             XSETFASTINT (obj, c | flags);