diff options
author | jao <jao@gnu.org> | 2024-11-07 18:01:13 +0000 |
---|---|---|
committer | jao <jao@gnu.org> | 2024-11-07 18:01:13 +0000 |
commit | 4308710de811e3b4e2fb47f9024439df03e96b90 (patch) | |
tree | fb719224f99c57d6b2b9b0bd4257208f7d038dc4 /attic/elisp/jao-notmuch-move.el | |
parent | 5efb9fee7e72c8c514d08940e98f7eb24b90c374 (diff) | |
download | elibs-4308710de811e3b4e2fb47f9024439df03e96b90.tar.gz elibs-4308710de811e3b4e2fb47f9024439df03e96b90.tar.bz2 |
{if,when}-let deprecation in emacs 31
Diffstat (limited to 'attic/elisp/jao-notmuch-move.el')
-rw-r--r-- | attic/elisp/jao-notmuch-move.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/attic/elisp/jao-notmuch-move.el b/attic/elisp/jao-notmuch-move.el index eb7ea4c..d4626bf 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 jao +;; Copyright (C) 2021, 2024 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"))) |