From f4c304c8543c6805fbd0569e8d710d7b32e91a23 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 25 Feb 2017 23:32:07 -0500 Subject: Add notmuch-show-open-github-patch command --- init.el | 2 ++ lisp/km-mail.el | 6 ++++++ 2 files changed, 8 insertions(+) diff --git a/init.el b/init.el index 8ab5f7c..b8942f4 100644 --- a/init.el +++ b/init.el @@ -2019,6 +2019,8 @@ '(:name "today" :query "date:today.." :key ".")) (define-key notmuch-show-mode-map (kbd "C-c m") 'km/notmuch-show-prefix-map) + (define-key km/notmuch-show-prefix-map "p" + #'km/notmuch-show-open-github-patch) (define-key km/notmuch-show-prefix-map "i" #'km/notmuch-show-copy-message-id-as-kill)) diff --git a/lisp/km-mail.el b/lisp/km-mail.el index 7bc462f..c23ff26 100644 --- a/lisp/km-mail.el +++ b/lisp/km-mail.el @@ -124,6 +124,12 @@ argument FOLLOW, follow link instead of copying it." (km/gnus-summary-set-current-article) (km/open-github-patch gnus-original-article-buffer)) +(defun km/notmuch-show-open-github-patch () + "Open patch from GitHub email." + (interactive) + (with-current-notmuch-show-message + (km/mail-open-github-patch (current-buffer)))) + (defun km/gnus-summary-catchup (&optional no-next) "Mark all articles as read. Don't ask for confirmation. With prefix argument NO-NEXT, exit -- cgit v1.2.3