From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp0 ([2001:41d0:2:863f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms12 with LMTPS id 0G6XHwYrdmE7QAAAsNZ9tg (envelope-from ); Mon, 25 Oct 2021 03:56:54 +0000 Received: from out1.migadu.com ([2001:41d0:2:863f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp0 with LMTPS id 6BRqGwYrdmEhPAAA1q6Kng (envelope-from ); Mon, 25 Oct 2021 03:56:54 +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=1635134214; 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=8+63oxqt8O+bysZ7BjaJPIhV9YgXJ1YMNs46HmQYh6Q=; b=bWiAHb09O0rqqX/8BnBLf0xOAwKPMt9K9rloienJxx5xp4pMuyOGxumPEMchlKFSqyhCFE r121bzi06DaINLcrVF37YlRk4tJi7IjV7L3I3vhdhSaxddXAd5SGX+Bg30bOEZZSbIkg97 qEHRVAnceWKMULDTgwrzUY0durj+CDe4kfgX1qyea6BHPdbkTV1/8Aai99UbzHBOn+DFv2 uDkuQEBQ8qLFMYNbcZH7xCINhgJuMakyymwxJ329O+9pjb+bqy7GD74QYySyCT4tUTSUWk qe/768r2DCKEn98qEaG0GqQB33UdLV84OS7bbQgaQ1r8devVnEUWmkILyhjKXg== From: Kyle Meyer To: piem@inbox.kyleam.com Subject: [PATCH 10/10] lei: Rename piem-lei-show-mid to piem-lei-buffer-mid Date: Sun, 24 Oct 2021 23:56:30 -0400 Message-Id: <20211025035630.297598-11-kyle@kyleam.com> In-Reply-To: <20211025035630.297598-1-kyle@kyleam.com> References: <20211025035630.297598-1-kyle@kyleam.com> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Migadu-Flow: FLOW_OUT X-Migadu-Auth-User: kyle@kyleam.com X-TUID: 5CczW5xf5ujI The new name aligns more closely with the piem-lei-buffer-query and piem-lei-buffer-args buffer-local variables introduced in the previous commit. --- piem-lei.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/piem-lei.el b/piem-lei.el index 2f09c387..ffd72f39 100644 --- a/piem-lei.el +++ b/piem-lei.el @@ -93,7 +93,7 @@ (defface piem-lei-show-cited-text-4 '((t :inherit message-cited-text-4)) "Face for 4th-level cited text in `piem-lei-show-mode' buffers.") -(defvar-local piem-lei-show-mid nil +(defvar-local piem-lei-buffer-mid nil "Message ID shown in current buffer.") (defvar-local piem-lei-buffer-args nil @@ -153,7 +153,7 @@ (defun piem-lei-show (mid &optional args display) (1+ (line-end-position)))) (piem-lei-show-mode) (setq piem-lei-buffer-args args) - (setq piem-lei-show-mid mid) + (setq piem-lei-buffer-mid mid) (setq piem-lei-buffer-query query) (piem-lei-show--fontify-headers)) (if display @@ -339,7 +339,7 @@ (defun piem-lei-query-show-or-scroll-up (arg) (let ((w (piem-lei-query--get-visible-message-window))) (if (and w (equal (with-current-buffer (window-buffer w) - piem-lei-show-mid) + piem-lei-buffer-mid) mid)) (with-selected-window w (scroll-up-command arg)) @@ -723,7 +723,7 @@ (defun piem-lei-query-thread (mid &optional args) (goto-char (or pt-final (point-min))) (piem-lei-query-mode) (setq piem-lei-buffer-args args) - (setq piem-lei-show-mid mid) + (setq piem-lei-buffer-mid mid) (setq piem-lei-buffer-query query) (pop-to-buffer-same-window (current-buffer))))) @@ -733,7 +733,7 @@ (defun piem-lei-query-thread (mid &optional args) (defun piem-lei-get-mid () "Return the message ID of a lei buffer." (cond ((derived-mode-p 'piem-lei-show-mode) - piem-lei-show-mid) + piem-lei-buffer-mid) ((derived-mode-p 'piem-lei-query-mode) (piem-lei-query-get-mid)))) -- 2.33.1