From aaefee0d016633a6178a8335b247e839668dc46c Mon Sep 17 00:00:00 2001 From: Jonas Bernoulli Date: Fri, 22 Nov 2024 20:28:01 +0100 Subject: [PATCH] Remove comments mentioning a legacy Emacs bug I won't forget about that again. Also, because it emphasizes that even though overall the value matter, there also are side-effects, I would use the `progn' even it weren't necessary to work around that historic bug. --- lisp/transient.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/transient.el b/lisp/transient.el index 8e4697f..d25dc76 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -1715,7 +1715,7 @@ probably use this instead: (error "BUG: Cannot determine suffix object"))))) ((and-let* ((obj (transient--suffix-prototype (or command this-command))) (obj (clone obj))) - (progn ; work around debbugs#31840 + (progn (transient-init-scope obj) (transient-init-value obj) obj))))) @@ -2186,7 +2186,7 @@ value. Otherwise return CHILDREN as is." (oset obj inapt t)))) (suffixes (mapcan (lambda (c) (transient--init-child levels c obj)) (transient-setup-children obj children)))) - (progn ; work around debbugs#31840 + (progn (oset obj suffixes suffixes) (list obj)))))