From: Jameson Graef Rollins <jrollins@finestructure.net>
To: Notmuch Mail <notmuch@notmuchmail.org>
Subject: [PATCH 3/3] emacs: add delete key bindings for search and show mode.
Date: Tue, 17 Jan 2012 11:02:49 -0800 [thread overview]
Message-ID: <1326826969-23545-3-git-send-email-jrollins@finestructure.net> (raw)
In-Reply-To: <1326826969-23545-2-git-send-email-jrollins@finestructure.net>
This mimics the archiving keys ('a' and 'A').
---
emacs/notmuch-show.el | 2 ++
emacs/notmuch.el | 1 +
2 files changed, 3 insertions(+), 0 deletions(-)
diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 141241d..f0259d5 100644
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -945,6 +945,8 @@ thread id. If a prefix is given, crypto processing is toggled."
(define-key map "-" 'notmuch-show-remove-tag)
(define-key map "+" 'notmuch-show-add-tag)
(define-key map "x" 'notmuch-show-archive-thread-then-exit)
+ (define-key map "d" 'notmuch-show-delete-message-then-next)
+ (define-key map "D" 'notmuch-show-delete-thread-then-next)
(define-key map "a" 'notmuch-show-archive-message-then-next)
(define-key map "A" 'notmuch-show-archive-thread-then-next)
(define-key map "N" 'notmuch-show-next-message)
diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 2acb31b..9f1b1ca 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -225,6 +225,7 @@ For a mouse binding, return nil."
(define-key map "f" 'notmuch-search-filter)
(define-key map [mouse-1] 'notmuch-search-show-thread)
(define-key map "*" 'notmuch-search-operate-all)
+ (define-key map "d" 'notmuch-search-delete-thread)
(define-key map "a" 'notmuch-search-archive-thread)
(define-key map "-" 'notmuch-search-remove-tag)
(define-key map "+" 'notmuch-search-add-tag)
--
1.7.7.3
next prev parent reply other threads:[~2012-01-17 19:02 UTC|newest]
Thread overview: 16+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-01-17 19:01 on deleting messages Jameson Graef Rollins
2012-01-17 19:02 ` [PATCH 1/3] emacs: modify help message for notmuch-search-line-faces to reflect preferred "deleted" tag name Jameson Graef Rollins
2012-01-17 19:02 ` [PATCH 2/3] emacs: message/thread deletion by adding "deleted" tag Jameson Graef Rollins
2012-01-17 19:02 ` Jameson Graef Rollins [this message]
2012-04-15 17:25 ` [PATCH 1/3] emacs: modify help message for notmuch-search-line-faces to reflect preferred "deleted" tag name Mark Walters
2012-04-15 17:39 ` Tomi Ollila
2012-04-15 20:06 ` Jameson Graef Rollins
2012-04-16 5:13 ` Tomi Ollila
2012-04-16 5:46 ` Jameson Graef Rollins
2012-04-16 7:02 ` Tomi Ollila
2012-04-25 2:30 ` David Bremner
2012-01-17 20:21 ` on deleting messages Jani Nikula
2012-01-18 7:30 ` Tomi Ollila
2012-01-17 22:31 ` Xavier Maillard
2012-01-18 7:44 ` Antoine Beaupré
2012-01-18 8:18 ` David Edmondson
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://notmuchmail.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=1326826969-23545-3-git-send-email-jrollins@finestructure.net \
--to=jrollins@finestructure.net \
--cc=notmuch@notmuchmail.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://yhetil.org/notmuch.git/
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).