1 Return-Path: <amdragon@mit.edu>
\r
2 X-Original-To: notmuch@notmuchmail.org
\r
3 Delivered-To: notmuch@notmuchmail.org
\r
4 Received: from localhost (localhost [127.0.0.1])
\r
5 by olra.theworths.org (Postfix) with ESMTP id F0DFE431FBD
\r
6 for <notmuch@notmuchmail.org>; Tue, 15 Jul 2014 07:06:33 -0700 (PDT)
\r
7 X-Virus-Scanned: Debian amavisd-new at olra.theworths.org
\r
11 X-Spam-Status: No, score=-0.7 tagged_above=-999 required=5
\r
12 tests=[RCVD_IN_DNSWL_LOW=-0.7] autolearn=disabled
\r
13 Received: from olra.theworths.org ([127.0.0.1])
\r
14 by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)
\r
15 with ESMTP id aBBMy4qjJJG1 for <notmuch@notmuchmail.org>;
\r
16 Tue, 15 Jul 2014 07:06:28 -0700 (PDT)
\r
17 Received: from dmz-mailsec-scanner-6.mit.edu (dmz-mailsec-scanner-6.mit.edu
\r
19 (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits))
\r
20 (No client certificate requested)
\r
21 by olra.theworths.org (Postfix) with ESMTPS id AC0A5431FC3
\r
22 for <notmuch@notmuchmail.org>; Tue, 15 Jul 2014 07:06:23 -0700 (PDT)
\r
23 X-AuditID: 12074423-f79bf6d000007580-25-53c5355e391c
\r
24 Received: from mailhub-auth-3.mit.edu ( [18.9.21.43])
\r
25 (using TLS with cipher AES256-SHA (256/256 bits))
\r
26 (Client did not present a certificate)
\r
27 by dmz-mailsec-scanner-6.mit.edu (Symantec Messaging Gateway) with SMTP
\r
28 id 29.09.30080.F5535C35; Tue, 15 Jul 2014 10:06:23 -0400 (EDT)
\r
29 Received: from outgoing.mit.edu (outgoing-auth-1.mit.edu [18.9.28.11])
\r
30 by mailhub-auth-3.mit.edu (8.13.8/8.9.2) with ESMTP id s6FE6GIx018306;
\r
31 Tue, 15 Jul 2014 10:06:16 -0400
\r
32 Received: from drake.dyndns.org
\r
33 (216-15-114-40.c3-0.arl-ubr1.sbo-arl.ma.cable.rcn.com
\r
34 [216.15.114.40]) (authenticated bits=0)
\r
35 (User authenticated as amdragon@ATHENA.MIT.EDU)
\r
36 by outgoing.mit.edu (8.13.8/8.12.4) with ESMTP id s6FE6Djl008839
\r
37 (version=TLSv1/SSLv3 cipher=AES256-SHA bits=256 verify=NOT);
\r
38 Tue, 15 Jul 2014 10:06:15 -0400
\r
39 Received: from amthrax by drake.dyndns.org with local (Exim 4.77)
\r
40 (envelope-from <amdragon@mit.edu>)
\r
41 id 1X73Mx-0000h4-MW; Tue, 15 Jul 2014 10:06:11 -0400
\r
42 From: Austin Clements <amdragon@MIT.EDU>
\r
43 To: notmuch@notmuchmail.org
\r
44 Subject: [PATCH v2 2/2] emacs: Expand default saved searches and add shortcut
\r
46 Date: Tue, 15 Jul 2014 10:06:06 -0400
\r
47 Message-Id: <1405433166-2198-3-git-send-email-amdragon@mit.edu>
\r
48 X-Mailer: git-send-email 2.0.0
\r
49 In-Reply-To: <1405433166-2198-1-git-send-email-amdragon@mit.edu>
\r
50 References: <1405353735-26244-1-git-send-email-amdragon@mit.edu>
\r
51 <1405433166-2198-1-git-send-email-amdragon@mit.edu>
\r
52 X-Brightmail-Tracker:
\r
53 H4sIAAAAAAAAA+NgFjrPIsWRmVeSWpSXmKPExsUixCmqrRtvejTY4NUXFosbrd2MFvvubGGy
\r
54 WD2Xx+L6zZnMDiweu57/ZfLYOesuu8ezVbeYPbYces8cwBLFZZOSmpNZllqkb5fAlbF22VrG
\r
55 gu1CFTsW3mZqYLzO28XIwSEhYCJxZ5lZFyMnkCkmceHeerYuRi4OIYHZTBInbz1mgXA2Mkoc
\r
56 erCQEcK5wySx6P89dghnLqPErH1T2ED62QQ0JLbtX84IYosISEvsvDubFcRmFsiS2PDyIDPI
\r
57 OmGBIIkpb+pBwiwCqhLN684yg9i8AvYSn9bdZIE4Q06i4cYnsJGcAg4SH7f+BrOFBMoknuw7
\r
58 yDqBkX8BI8MqRtmU3Crd3MTMnOLUZN3i5MS8vNQiXTO93MwSvdSU0k2MoHBjd1HewfjnoNIh
\r
59 RgEORiUeXol3h4OFWBPLiitzDzFKcjApifIWsx0NFuJLyk+pzEgszogvKs1JLT7EKMHBrCTC
\r
60 K2kClONNSaysSi3Kh0lJc7AoifO+tbYKFhJITyxJzU5NLUgtgsnKcHAoSfAygzQKFqWmp1ak
\r
61 ZeaUIKSZODhBhvMADecFG15ckJhbnJkOkT/FqCglznvCGCghAJLIKM2D64Wlg1eM4kCvCPNe
\r
62 AaniAaYSuO5XQIOZgAaX1xwGGVySiJCSamDczCkirv1VSOI8++0f8/6dqJXPux8gI5FWN1lP
\r
63 yMvlVZSIQoK9R9T0Bpf/+tUGdy4eOnRmInPHv2+qnBoy3WzmLGfu7/HrZds+QVDKXl7F2OiU
\r
64 S46nxdSa1xPXqcrmsn6+6Pyx8CSLWTzXBn/GbRJH7MJ1JcIUV7BdC4/qun09uoFdJDT7jxJL
\r
65 cUaioRZzUXEiAJX+4GLiAgAA
\r
66 X-BeenThere: notmuch@notmuchmail.org
\r
67 X-Mailman-Version: 2.1.13
\r
69 List-Id: "Use and development of the notmuch mail system."
\r
70 <notmuch.notmuchmail.org>
\r
71 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,
\r
72 <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>
\r
73 List-Archive: <http://notmuchmail.org/pipermail/notmuch>
\r
74 List-Post: <mailto:notmuch@notmuchmail.org>
\r
75 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>
\r
76 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,
\r
77 <mailto:notmuch-request@notmuchmail.org?subject=subscribe>
\r
78 X-List-Received-Date: Tue, 15 Jul 2014 14:06:34 -0000
\r
80 This should help new users off to a better start with the addition of
\r
81 more sensible saved searches and default shortcut keys. Most existing
\r
82 users have probably customized this variable and won't be affected.
\r
84 emacs/notmuch-hello.el | 9 +++++++--
\r
85 test/emacs.expected-output/notmuch-hello | 2 +-
\r
86 test/emacs.expected-output/notmuch-hello-long-names | 2 +-
\r
87 3 files changed, 9 insertions(+), 4 deletions(-)
\r
89 diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el
\r
90 index 061b27d..65d0627 100644
\r
91 --- a/emacs/notmuch-hello.el
\r
92 +++ b/emacs/notmuch-hello.el
\r
93 @@ -93,8 +93,13 @@ (define-widget 'notmuch-saved-search-plist 'list
\r
94 (const :tag "Oldest-first" oldest-first)
\r
95 (const :tag "Newest-first" newest-first))))))
\r
97 -(defcustom notmuch-saved-searches '((:name "inbox" :query "tag:inbox")
\r
98 - (:name "unread" :query "tag:unread"))
\r
99 +(defcustom notmuch-saved-searches
\r
100 + `((:name "inbox" :query "tag:inbox" :key ,(kbd "i"))
\r
101 + (:name "unread" :query "tag:unread" :key ,(kbd "u"))
\r
102 + (:name "flagged" :query "tag:flagged" :key ,(kbd "f"))
\r
103 + (:name "sent" :query "tag:sent" :key ,(kbd "t"))
\r
104 + (:name "drafts" :query "tag:draft" :key ,(kbd "d"))
\r
105 + (:name "all mail" :query "*" :key ,(kbd "a")))
\r
106 "A list of saved searches to display.
\r
108 The saved search can be given in 3 forms. The preferred way is as
\r
109 diff --git a/test/emacs.expected-output/notmuch-hello b/test/emacs.expected-output/notmuch-hello
\r
110 index 2d69891..9ba4cfc 100644
\r
111 --- a/test/emacs.expected-output/notmuch-hello
\r
112 +++ b/test/emacs.expected-output/notmuch-hello
\r
115 Saved searches: [edit]
\r
117 - 52 inbox 52 unread
\r
118 + 52 inbox 52 unread 52 all mail
\r
122 diff --git a/test/emacs.expected-output/notmuch-hello-long-names b/test/emacs.expected-output/notmuch-hello-long-names
\r
123 index 486d0d9..1c8d6eb 100644
\r
124 --- a/test/emacs.expected-output/notmuch-hello-long-names
\r
125 +++ b/test/emacs.expected-output/notmuch-hello-long-names
\r
128 Saved searches: [edit]
\r
130 - 52 inbox 52 unread
\r
131 + 52 inbox 52 unread 52 all mail
\r