From a36203c0d8d32a1ddf3009cce6c04e0c6f26477e Mon Sep 17 00:00:00 2001
From: Raul Benencia <id@rbenencia.name>
Date: Sat, 11 Feb 2023 08:42:06 -0800
Subject: emacs: notmuch keybindings

---
 .emacs.local.d/modes/notmuch.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to '.emacs.local.d/modes')

diff --git a/.emacs.local.d/modes/notmuch.el b/.emacs.local.d/modes/notmuch.el
index 42bdc45..2b9b137 100644
--- a/.emacs.local.d/modes/notmuch.el
+++ b/.emacs.local.d/modes/notmuch.el
@@ -41,8 +41,13 @@
   (org-store-link nil)
   (org-capture nil "m")
   )
+
 (bind-key "t" 'rul/capture-mail notmuch-show-mode-map)
 
+(define-key notmuch-show-mode-map "R" 'notmuch-show-reply)
+(define-key notmuch-search-mode-map "R" 'notmuch-search-reply-to-thread)
+(define-key notmuch-tree-mode-map "R" (notmuch-tree-close-message-pane-and #'notmuch-show-reply))
+
 ; Spam
 (define-key notmuch-show-mode-map "S"
   (lambda ()
@@ -72,7 +77,7 @@
     (notmuch-refresh-this-buffer)))
 
 ; Mark as read
-(define-key notmuch-search-mode-map "R"
+(define-key notmuch-search-mode-map "r"
   (lambda (&optional beg end)
     "mark thread as read"
     (interactive (notmuch-search-interactive-region))
-- 
cgit v1.2.3