From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 12 Aug 2017 09:45:05 +0000 (+0300)
Subject: Adapt tabulated list when display-line-number is turned on
X-Git-Tag: emacs-26.0.90~486
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a955d7951624bf38649448dc89b411e8212dec0b;p=emacs.git

Adapt tabulated list when display-line-number is turned on

* lisp/emacs-lisp/tabulated-list.el (tabulated-list-mode): Add
a hook to revert the display when display-line-numbers is turned
on.  (Bug#27895)
---

diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el
index b91532f7e83..955b664b8c5 100644
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -628,7 +628,9 @@ as the ewoc pretty-printer."
   (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))
+  (setq bidi-paragraph-direction 'left-to-right)
+  ;; This is for if/when they turn on display-line-numbers
+  (add-hook 'display-line-numbers-mode-hook #'tabulated-list-revert nil t))
 
 (put 'tabulated-list-mode 'mode-class 'special)