diff options
| author | jao <jao@gnu.org> | 2024-11-12 18:58:14 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2024-11-12 18:58:14 +0000 |
| commit | 418212e4eb963813c078cf290cddfe7e3defd7ed (patch) | |
| tree | 3c265c395b0afe67f88f5e18a34f368a88f970d6 /attic/elisp/jao-maildir.el | |
| parent | 8ddc2d688cd37693320e46aa3d35d72f06e5bab3 (diff) | |
| download | elibs-418212e4eb963813c078cf290cddfe7e3defd7ed.tar.gz elibs-418212e4eb963813c078cf290cddfe7e3defd7ed.tar.bz2 | |
Revert "{if,when}-let deprecation in emacs 31"
This reverts commit 4308710de811e3b4e2fb47f9024439df03e96b90.
Diffstat (limited to 'attic/elisp/jao-maildir.el')
| -rw-r--r-- | attic/elisp/jao-maildir.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/attic/elisp/jao-maildir.el b/attic/elisp/jao-maildir.el index 90cf0b4..18a1725 100644 --- a/attic/elisp/jao-maildir.el +++ b/attic/elisp/jao-maildir.el @@ -90,7 +90,7 @@ 0)) (defun jao-maildir--update-track-string (mbox) - (when-let* ((track (seq-find (lambda (td) (string-match-p (car td) mbox)) + (when-let ((track (seq-find (lambda (td) (string-match-p (car td) mbox)) jao-maildir--trackers))) (let* ((label (cadr track)) (other (assoc-delete-all label jao-maildir--track-strings)) |