[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master c40398e008: Fix widening some columns in tabulated-list-widen-cur
From: |
Lars Ingebrigtsen |
Subject: |
master c40398e008: Fix widening some columns in tabulated-list-widen-current-column |
Date: |
Tue, 25 Jan 2022 07:58:52 -0500 (EST) |
branch: master
commit c40398e0080a44eac709871f9eb3fca2bb9a1560
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix widening some columns in tabulated-list-widen-current-column
* lisp/emacs-lisp/tabulated-list.el
(tabulated-list-widen-current-column): Don't bug out on list-based
columns (bug#53498).
---
lisp/emacs-lisp/tabulated-list.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/tabulated-list.el
b/lisp/emacs-lisp/tabulated-list.el
index a242ac1899..2defef8107 100644
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master c40398e008: Fix widening some columns in tabulated-list-widen-current-column,
Lars Ingebrigtsen <=