From 418212e4eb963813c078cf290cddfe7e3defd7ed Mon Sep 17 00:00:00 2001 From: jao Date: Tue, 12 Nov 2024 18:58:14 +0000 Subject: Revert "{if,when}-let deprecation in emacs 31" This reverts commit 4308710de811e3b4e2fb47f9024439df03e96b90. --- attic/elisp/jao-notmuch-move.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'attic/elisp/jao-notmuch-move.el') 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 ;; 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"))) -- cgit v1.2.3