diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2023-12-16 20:04:42 +0100 |
|---|---|---|
| committer | Jonas Bernoulli <jonas@bernoul.li> | 2023-12-16 20:04:42 +0100 |
| commit | ed1c5826f0920d68d6f42c986d6721f854342984 (patch) | |
| tree | 3acca37cee705e519bbea04f2d5376f37351c105 | |
| parent | eb6e903b6a1271bdf713dae52c7718a874dec1e2 (diff) | |
transient--insert-group(columns): Bind transient--pending-group
Bind it to the column group for which a suffix is currently being
inserted.
Fixes #269.
| -rw-r--r-- | lisp/transient.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/transient.el b/lisp/transient.el index f17323b..2537685 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -3623,7 +3623,8 @@ have a history of their own.") (lambda (column) (transient--maybe-pad-keys column group) (transient-with-shadowed-buffer - (let ((rows (mapcar #'transient-format (oref column suffixes)))) + (let* ((transient--pending-group column) + (rows (mapcar #'transient-format (oref column suffixes)))) (when-let ((desc (transient-format-description column))) (push desc rows)) (flatten-tree rows)))) |