[Emacs-diffs] master 08431a2: Fix display of keyboard layouts for right-to-left scripts

[Eli Zaretskii]

branch: master
commit 08431a20c55bc9b7f3f1c489a481663633794420
Author: Michael Vehrs <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    Fix display of keyboard layouts for right-to-left scripts
    
    * lisp/international/quail.el (quail-insert-kbd-layout): Force
    left-to-right paragraph direction.
---
 lisp/international/quail.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 5e422bf..90a540a 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)