From: Michael Vehrs <Michael.Burschik@gmx.de>
Date: Sat, 2 May 2015 14:08:54 +0000 (+0300)
Subject: Fix display of keyboard layouts for right-to-left scripts
X-Git-Tag: emacs-25.0.90~2228
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=08431a20c55bc9b7f3f1c489a481663633794420;p=emacs.git

Fix display of keyboard layouts for right-to-left scripts

* lisp/international/quail.el (quail-insert-kbd-layout): Force
left-to-right paragraph direction.
---

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 5e422bf5fdb..90a540aae30 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -793,9 +793,10 @@ you type is correctly handled."
 		 keyseq)))
 
 (defun quail-insert-kbd-layout (kbd-layout)
-"Insert the visual keyboard layout table according to KBD-LAYOUT.
+  "Insert the visual keyboard layout table according to KBD-LAYOUT.
 The format of KBD-LAYOUT is the same as `quail-keyboard-layout'."
   (let (done-list layout i ch)
+    (setq bidi-paragraph-direction 'left-to-right)
     ;; At first, convert KBD-LAYOUT to the same size vector that
     ;; contains translated character or string.
     (setq layout (string-to-vector kbd-layout)