From: Kenichi Handa <handa@m17n.org>
Date: Thu, 25 Sep 1997 12:40:02 +0000 (+0000)
Subject: (quail-translation-keymap): Bind right, left, down, and up keys.
X-Git-Tag: emacs-20.3~3086
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4afb4ca5d54ede4574555572b63bc072af2d700e;p=emacs.git

(quail-translation-keymap): Bind right, left, down, and up keys.
---

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 97ec7ba4d27..4191f61255a 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -287,6 +287,10 @@ LEIM is available from the same ftp directory as Emacs."))
     (define-key map "\C-b" 'quail-prev-translation)
     (define-key map "\C-n" 'quail-next-translation-block)
     (define-key map "\C-p" 'quail-prev-translation-block)
+    (define-key map [right] 'quail-next-translation)
+    (define-key map [left] 'quail-prev-translation)
+    (define-key map [down] 'quail-next-translation-block)
+    (define-key map [up] 'quail-prev-translation-block)
     (define-key map "\C-i" 'quail-completion)
     (define-key map "\C-@" 'quail-select-current)
     (define-key map "\C-h" 'quail-translation-help)