summaryrefslogtreecommitdiffhomepage
path: root/lib/doc/jao-doc-session.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2024-11-12 18:58:14 +0000
committerjao <jao@gnu.org>2024-11-12 18:58:14 +0000
commit418212e4eb963813c078cf290cddfe7e3defd7ed (patch)
tree3c265c395b0afe67f88f5e18a34f368a88f970d6 /lib/doc/jao-doc-session.el
parent8ddc2d688cd37693320e46aa3d35d72f06e5bab3 (diff)
downloadelibs-418212e4eb963813c078cf290cddfe7e3defd7ed.tar.gz
elibs-418212e4eb963813c078cf290cddfe7e3defd7ed.tar.bz2
Revert "{if,when}-let deprecation in emacs 31"main
This reverts commit 4308710de811e3b4e2fb47f9024439df03e96b90.
Diffstat (limited to 'lib/doc/jao-doc-session.el')
-rw-r--r--lib/doc/jao-doc-session.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/doc/jao-doc-session.el b/lib/doc/jao-doc-session.el
index 928cf26..877a8cb 100644
--- a/lib/doc/jao-doc-session.el
+++ b/lib/doc/jao-doc-session.el
@@ -36,7 +36,7 @@
(let ((docs '())
(cb (and skip-current (current-buffer))))
(dolist (b (buffer-list))
- (when-let* ((fs (and (not (eq cb b)) (jao-doc-session-is-doc b))))
+ (when-let (fs (and (not (eq cb b)) (jao-doc-session-is-doc b)))
(dolist (f fs) (add-to-list 'docs f))))
(when (or force (> (length docs) 0))
(setq jao-doc-session docs))))