aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog4
-rw-r--r--src/keymap.c5
2 files changed, 7 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 6080cfd8520..ff3dc5bc1fb 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
12001-02-24 Stefan Monnier <monnier@cs.yale.edu>
2
3 * keymap.c (where_is_internal): Accept non-ascii integer prefixes.
4
12001-02-24 Kenichi Handa <handa@etl.go.jp> 52001-02-24 Kenichi Handa <handa@etl.go.jp>
2 6
3 * Makefile.in (lisp): Add international/utf-8.elc. 7 * Makefile.in (lisp): Add international/utf-8.elc.
diff --git a/src/keymap.c b/src/keymap.c
index dea2515890b..5493bc583c8 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -2102,10 +2102,11 @@ where_is_internal (definition, keymaps, firstonly, noindirect)
2102 last_is_meta = (XINT (last) >= 0 2102 last_is_meta = (XINT (last) >= 0
2103 && EQ (Faref (this, last), meta_prefix_char)); 2103 && EQ (Faref (this, last), meta_prefix_char));
2104 2104
2105 if (nomenus && !ascii_sequence_p (this)) 2105 /* if (nomenus && !ascii_sequence_p (this)) */
2106 if (nomenus && XINT (last) >= 0 && !INTEGERP (Faref (this, 0)))
2106 /* If no menu entries should be returned, skip over the 2107 /* If no menu entries should be returned, skip over the
2107 keymaps bound to `menu-bar' and `tool-bar' and other 2108 keymaps bound to `menu-bar' and `tool-bar' and other
2108 non-ascii prefixes. */ 2109 non-ascii prefixes like `C-down-mouse-2'. */
2109 continue; 2110 continue;
2110 2111
2111 QUIT; 2112 QUIT;