changeset 36373:274190d289d7

(where_is_internal): Accept non-ascii integer prefixes.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 24 Feb 2001 17:07:17 +0000
parents 5a7a1ff72e96
children 08c23aec4863
files src/keymap.c
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/keymap.c	Sat Feb 24 03:12:35 2001 +0000
+++ b/src/keymap.c	Sat Feb 24 17:07:17 2001 +0000
@@ -2102,10 +2102,11 @@
       last_is_meta = (XINT (last) >= 0
 		      && EQ (Faref (this, last), meta_prefix_char));
 
-      if (nomenus && !ascii_sequence_p (this))
+      /* if (nomenus && !ascii_sequence_p (this)) */
+      if (nomenus && XINT (last) >= 0 && !INTEGERP (Faref (this, 0)))
 	/* If no menu entries should be returned, skip over the
 	   keymaps bound to `menu-bar' and `tool-bar' and other
-	   non-ascii prefixes.  */
+	   non-ascii prefixes like `C-down-mouse-2'.  */
 	continue;
       
       QUIT;