Mercurial > hg > xemacs-beta
diff src/events.c @ 70:131b0175ea99 r20-0b30
Import from CVS: tag r20-0b30
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:02:59 +0200 |
parents | 859a2309aef8 |
children | 4be1180a9e89 |
line wrap: on
line diff
--- a/src/events.c Mon Aug 13 09:00:04 2007 +0200 +++ b/src/events.c Mon Aug 13 09:02:59 2007 +0200 @@ -670,7 +670,9 @@ if (event->event_type == dead_event) error ("character-to-event called with a deallocated event!"); +#ifndef MULE c &= 255; +#endif if (c > 127 && c <= 255) { int meta_flag = 1; @@ -782,6 +784,9 @@ { if (! allow_meta) return -1; if (c & 0200) return -1; /* don't allow M-oslash (overlap) */ +#ifdef MULE + if (c >= 256) return -1; +#endif c |= 0200; } return c; @@ -805,7 +810,7 @@ Note that specifying both ALLOW-META and ALLOW-NON-ASCII is ambiguous, as both use the high bit; `M-x' and `oslash' will be indistinguishable. */ - (event, allow_extra_modifiers, allow_meta, allow_non_ascii)) + (event, allow_extra_modifiers, allow_meta, allow_non_ascii)) { Emchar c; CHECK_LIVE_EVENT (event);