diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2017-08-12 12:45:05 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2017-08-12 12:45:05 +0300 |
| commit | a955d7951624bf38649448dc89b411e8212dec0b (patch) | |
| tree | 690bb27f869163d3755117640954a3f8da38631c /lisp/emacs-lisp | |
| parent | 8cc8ad02bd5c410c61680735149ce7caf67f088d (diff) | |
| download | emacs-a955d7951624bf38649448dc89b411e8212dec0b.tar.gz emacs-a955d7951624bf38649448dc89b411e8212dec0b.tar.bz2 emacs-a955d7951624bf38649448dc89b411e8212dec0b.zip | |
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)
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/tabulated-list.el | 4 |
1 files changed, 3 insertions, 1 deletions
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) |