summaryrefslogtreecommitdiffhomepage
path: root/attic/elisp/jao-notmuch-move.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 /attic/elisp/jao-notmuch-move.el
parent8ddc2d688cd37693320e46aa3d35d72f06e5bab3 (diff)
downloadelibs-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-notmuch-move.el')
-rw-r--r--attic/elisp/jao-notmuch-move.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/attic/elisp/jao-notmuch-move.el b/attic/elisp/jao-notmuch-move.el
index d4626bf..eb7ea4c 100644
--- a/attic/elisp/jao-notmuch-move.el
+++ b/attic/elisp/jao-notmuch-move.el
@@ -1,6 +1,6 @@
;;; jao-notmuch-move.el --- Move messages around in notmuch -*- lexical-binding: t; -*-
-;; Copyright (C) 2021, 2024 jao
+;; Copyright (C) 2021 jao
;; Author: jao <mail@jao.io>
;; Keywords: mail
@@ -37,9 +37,9 @@
(user-error "Message not in any registered mailbox!")))
(defun jao-notmuch--msg-props ()
- (if-let* ((p (save-excursion
- (beginning-of-line)
- (text-property-search-forward :notmuch-message-properties))))
+ (if-let ((p (save-excursion
+ (beginning-of-line)
+ (text-property-search-forward :notmuch-message-properties))))
(prop-match-value p)
(user-error "No message at point")))