summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2014-10-14 22:29:47 +0300
committerEli Zaretskii <eliz@gnu.org>2014-10-14 22:29:47 +0300
commit1d4795e86695a436ef8bcd065caeb448ea442a26 (patch)
tree846240eac8014c5bfc47055e41000913eb5d695a /lisp/emacs-lisp
parent3e19f95997c14bd6cfd09518bc848206ee3fd9f8 (diff)
downloademacs-1d4795e86695a436ef8bcd065caeb448ea442a26.tar.gz
emacs-1d4795e86695a436ef8bcd065caeb448ea442a26.tar.bz2
emacs-1d4795e86695a436ef8bcd065caeb448ea442a26.zip
Fix display of R2L entries in tabulated-list-mode.
lisp/emacs-lisp/tabulated-list.el (tabulated-list-mode): Force bidi-paragraph-direction to 'left-to-right'. This fixes buffer-menu display when the first buffer happens to start with R2L letter.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/tabulated-list.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el
index d0d71ddb935..86701068c4e 100644
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -518,7 +518,10 @@ as the ewoc pretty-printer."
(setq-local buffer-read-only t)
(setq-local buffer-undo-list t)
(setq-local revert-buffer-function #'tabulated-list-revert)
- (setq-local glyphless-char-display tabulated-list-glyphless-char-display))
+ (setq-local glyphless-char-display tabulated-list-glyphless-char-display)
+ ;; Avoid messing up the entries' display just because the first
+ ;; column of the first entry happens to begin with a R2L letter.
+ (setq bidi-paragraph-direction 'left-to-right))
(put 'tabulated-list-mode 'mode-class 'special)