From 9282b38a885714c3b4d4d79a8556b002d8b36987 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Fri, 10 Mar 2017 17:07:25 -0500 Subject: notmuch: Reverse meaning of argument for forwarding commands --- init.el | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/init.el b/init.el index 537e64d..ed6bcd6 100644 --- a/init.el +++ b/init.el @@ -2049,6 +2049,18 @@ (setq notmuch-wash-citation-lines-prefix 10) (setq notmuch-wash-citation-lines-suffix 10) + (advice-add + 'notmuch-show-forward-message :around + (lambda (fn &optional prompt-for-sender) + (funcall fn (not prompt-for-sender))) + '((name . "notmuch-show-forward-message--reverse-arg"))) + + (advice-add + 'notmuch-show-forward-open-messages :around + (lambda (fn &optional prompt-for-sender) + (funcall fn (not prompt-for-sender))) + '((name . "notmuch-show-forward-open-messages--reverse-arg"))) + (define-key notmuch-common-keymap "d" #'notmuch-jump-search) (define-key notmuch-message-mode-map (kbd "C-c C-s") nil) (define-key notmuch-show-mode-map "v" #'org-capture) -- cgit v1.2.3