From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp0 ([2001:41d0:2:267::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms12 with LMTPS id ymo3LGZ18l+XfQAAsNZ9tg (envelope-from ); Mon, 04 Jan 2021 01:54:46 +0000 Received: from out0.migadu.com ([2001:41d0:2:267::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp0 with LMTPS id aJGONmV18l8dHwAA1q6Kng (envelope-from ); Mon, 04 Jan 2021 01:54:45 +0000 X-Report-Abuse: Please report any abuse attempt to abuse@migadu.com and include these headers. DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=kyleam.com; s=key1; t=1609725285; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:mime-version:mime-version: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=5h57jF1tpTMW1bGtU6swIv0cXF3JV+mYJvHrF/OmOXU=; b=Sldiysi8tgFr3anufFnojGOO/AZsl4oOo6d+1rh6lYRwL/ZJeEU2mPmpPQFj7SpAWtTkkS dwo4WPekToMGHL7bqowkeZZvVWr+1aP9gS2telk1M274Y7seLikr8BphbylAENscCgDgOO 233XXTN7xzaJbcuna0ozgsGKKvjlv9ZHngemmyiAhHiBJRDDzL4ga7KvPCelHlPQ89BBGm dV0ZTZ4mf2ix8EDtuNHD+bwmpkUeoa6nftgzHQFzvi4T+QCEoUt+/rAzn7r6xWIvFsYNnc ooVHys9HGHPQZijA4g4+P/fm4AxKgDZvWdziJmtACmE2RKKpBRlwSFbKQM9ntQ== From: Kyle Meyer To: piem@inbox.kyleam.com Subject: [PATCH v2 1/3] piem-notmuch--with-current-message: Declare debug and indent specs Message-Id: <20210104015435.18397-2-kyle@kyleam.com> In-Reply-To: <20210104015435.18397-1-kyle@kyleam.com> References: <87zh1pbh7x.fsf@kyleam.com> <20210104015435.18397-1-kyle@kyleam.com> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Migadu-Flow: FLOW_OUT X-Migadu-Auth-User: kyle@kyleam.com Date: Mon, 04 Jan 2021 01:54:45 GMT X-TUID: YMZlHh1P9WEp --- piem-notmuch.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/piem-notmuch.el b/piem-notmuch.el index 361b450..ff8654c 100644 --- a/piem-notmuch.el +++ b/piem-notmuch.el @@ -33,6 +33,7 @@ (require 'piem) (require 'subr-x) (defmacro piem-notmuch--with-current-message (&rest body) + (declare (indent 0) (debug (body))) (let ((rv (make-symbol "rv"))) `(let (,rv) (with-current-notmuch-show-message @@ -43,7 +44,7 @@ (defun piem-notmuch-get-inbox () "Return inbox name from a `notmuch-show-mode' buffer." (when (derived-mode-p 'notmuch-show-mode) (piem-notmuch--with-current-message - (piem-inbox-by-header-match)))) + (piem-inbox-by-header-match)))) (defun piem-notmuch-get-mid () "Return the message ID of a `notmuch-show-mode' buffer." -- 2.29.2