procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix widening some columns in tabulated-list-widen-current-column

Browse source 
* lisp/emacs-lisp/tabulated-list.el
(tabulated-list-widen-current-column): Don't bug out on list-based
columns (bug#53498).
This commit is contained in:
Lars Ingebrigtsen 2022-01-25 13:58:30 +01:00
parent 44ffd6a825
commit c40398e008
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/emacs-lisp/tabulated-list.el
View file

@ -745,7 +745,10 @@ Interactively, N is the prefix numeric argument, and defaults to
(max (setq col-width
(cadr (aref tabulated-list-format
col-nb)))
(string-width (aref entry col-nb)))
(let ((desc (aref entry col-nb)))
(string-width (if (stringp desc)
desc
(car desc)))))
(or (plist-get (nthcdr 3 (aref tabulated-list-format
col-nb))
:pad-right)