changeset 29726:c9430bc1c824

* keyboard.c (follow_key, read_key_sequence): Use XUINT on key value, or checks for CHAR_META will fail. * keymap.c (get_keyelt): Likewise.
author Ken Raeburn <raeburn@raeburn.org>
date Mon, 19 Jun 2000 07:15:08 +0000
parents 2bc397e9b09a
children a1a4b7597a40
files src/ChangeLog src/keyboard.c src/keymap.c
diffstat 3 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
Binary file src/ChangeLog has changed
--- a/src/keyboard.c	Mon Jun 19 05:18:09 2000 +0000
+++ b/src/keyboard.c	Mon Jun 19 07:15:08 2000 +0000
@@ -8192,7 +8192,7 @@
 	      key = keybuf[fkey_end++];
 	      /* Look up meta-characters by prefixing them
 		 with meta_prefix_char.  I hate this.  */
-	      if (INTEGERP (key) && XINT (key) & meta_modifier)
+	      if (INTEGERP (key) && XUINT (key) & meta_modifier)
 		{
 		  fkey_next
 		    = get_keymap_1
@@ -8316,7 +8316,7 @@
 	    key = keybuf[keytran_end++];
 	    /* Look up meta-characters by prefixing them
 	       with meta_prefix_char.  I hate this.  */
-	    if (INTEGERP (key) && XINT (key) & meta_modifier)
+	    if (INTEGERP (key) && XUINT (key) & meta_modifier)
 	      {
 		keytran_next
 		  = get_keymap_1
--- a/src/keymap.c	Mon Jun 19 05:18:09 2000 +0000
+++ b/src/keymap.c	Mon Jun 19 07:15:08 2000 +0000
@@ -625,7 +625,7 @@
 	    {
 	      Lisp_Object key;
 	      key = Fcdr (object);
-	      if (INTEGERP (key) && (XINT (key) & meta_modifier))
+	      if (INTEGERP (key) && (XUINT (key) & meta_modifier))
 		{
 		  object = access_keymap (map, meta_prefix_char, 0, 0);
 		  map = get_keymap_1 (object, 0, autoload);