aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPo Lu2023-03-14 19:51:42 +0800
committerPo Lu2023-03-14 19:51:42 +0800
commita39ca9bf8e34e7cf6760e2fa3b7d644bef09ce91 (patch)
treec78902755dbe2205b2b4100794f9f90929b03bc6
parentaa24854e7ffa29ad5f1bb49dc794f9fdf5ef44dd (diff)
downloademacs-a39ca9bf8e34e7cf6760e2fa3b7d644bef09ce91.tar.gz
emacs-a39ca9bf8e34e7cf6760e2fa3b7d644bef09ce91.zip
Update Android port
* lisp/minibuffer.el (minibuffer-setup-on-screen-keyboard): Handle cases where last-event-frame is a kbd macro. * src/keyboard.c (lispy_function_keys): Remove duplicates.
-rw-r--r--lisp/minibuffer.el7
-rw-r--r--src/keyboard.c2
2 files changed, 4 insertions, 5 deletions
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index ef0eb1ca108..0055914105d 100644
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -4598,9 +4598,10 @@ This is run upon minibuffer setup."
4598 (cancel-timer minibuffer-on-screen-keyboard-timer) 4598 (cancel-timer minibuffer-on-screen-keyboard-timer)
4599 (setq minibuffer-on-screen-keyboard-timer nil)) 4599 (setq minibuffer-on-screen-keyboard-timer nil))
4600 (setq minibuffer-on-screen-keyboard-displayed nil) 4600 (setq minibuffer-on-screen-keyboard-displayed nil)
4601 (when (not (memq (device-class last-event-frame 4601 (when (and (framep last-event-frame)
4602 last-event-device) 4602 (not (memq (device-class last-event-frame
4603 '(keyboard core-keyboard))) 4603 last-event-device)
4604 '(keyboard core-keyboard))))
4604 (setq minibuffer-on-screen-keyboard-displayed 4605 (setq minibuffer-on-screen-keyboard-displayed
4605 (frame-toggle-on-screen-keyboard (selected-frame) nil)))) 4606 (frame-toggle-on-screen-keyboard (selected-frame) nil))))
4606 4607
diff --git a/src/keyboard.c b/src/keyboard.c
index e376fa299dd..11c37372db7 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -4996,8 +4996,6 @@ const char *const lispy_function_keys[] =
4996 [19] = "up", 4996 [19] = "up",
4997 [20] = "down", 4997 [20] = "down",
4998 [213] = "muhenkan", 4998 [213] = "muhenkan",
4999 [213] = "muhenkan",
5000 [214] = "henkan",
5001 [214] = "henkan", 4999 [214] = "henkan",
5002 [215] = "hiragana-katakana", 5000 [215] = "hiragana-katakana",
5003 [218] = "kana", 5001 [218] = "kana",