Re: [PATCH] emacs: wash: make word-wrap bound message width
[notmuch-archives.git] / 46 / e899160bc408d2ef72b48346ba240be5d586fd
1 Return-Path: <dmitry.kurochkin@gmail.com>\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 2D3EF429E5F\r
6         for <notmuch@notmuchmail.org>; Tue, 17 Jan 2012 07:56:32 -0800 (PST)\r
7 X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
8 X-Spam-Flag: NO\r
9 X-Spam-Score: -0.799\r
10 X-Spam-Level: \r
11 X-Spam-Status: No, score=-0.799 tagged_above=-999 required=5\r
12         tests=[DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1,\r
13         FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_LOW=-0.7] autolearn=disabled\r
14 Received: from olra.theworths.org ([127.0.0.1])\r
15         by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
16         with ESMTP id 5PUNg2CrwrZo for <notmuch@notmuchmail.org>;\r
17         Tue, 17 Jan 2012 07:56:31 -0800 (PST)\r
18 Received: from mail-bk0-f53.google.com (mail-bk0-f53.google.com\r
19         [209.85.214.53]) (using TLSv1 with cipher RC4-SHA (128/128 bits))\r
20         (No client certificate requested)\r
21         by olra.theworths.org (Postfix) with ESMTPS id 8CC9D429E3B\r
22         for <notmuch@notmuchmail.org>; Tue, 17 Jan 2012 07:56:31 -0800 (PST)\r
23 Received: by bkty12 with SMTP id y12so681386bkt.26\r
24         for <notmuch@notmuchmail.org>; Tue, 17 Jan 2012 07:56:30 -0800 (PST)\r
25 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma;\r
26         h=from:to:subject:date:message-id:x-mailer:in-reply-to:references;\r
27         bh=ii0Yyc+gPmlm6MUgpMopRNYoJYdQDmILLqvDBP3p/kg=;\r
28         b=OtCh6JoTPkdN/gF9k7+Kq3kIbAbzZJhpH7jJE9a9HE1hM3BapckyxcNxr9CeKjx1cg\r
29         NrAU/KNpf/tO36i7XPfJYYKk5wdWNg99hOC7okTZ8EFBC/KnxVShqCGiKT2LZIn9BfXJ\r
30         MhxyRCuEEv09XDdd9a2ThK0HkKUh63ap7GD7w=\r
31 Received: by 10.205.127.132 with SMTP id ha4mr5841883bkc.35.1326815790253;\r
32         Tue, 17 Jan 2012 07:56:30 -0800 (PST)\r
33 Received: from localhost ([91.144.186.21])\r
34         by mx.google.com with ESMTPS id iu2sm48106864bkb.0.2012.01.17.07.56.29\r
35         (version=TLSv1/SSLv3 cipher=OTHER);\r
36         Tue, 17 Jan 2012 07:56:29 -0800 (PST)\r
37 From: Dmitry Kurochkin <dmitry.kurochkin@gmail.com>\r
38 To: notmuch@notmuchmail.org\r
39 Subject: [PATCH v2] emacs: add invisible dot instead of space at the end of\r
40         notmuch-hello search box\r
41 Date: Tue, 17 Jan 2012 19:55:34 +0400\r
42 Message-Id: <1326815734-20421-1-git-send-email-dmitry.kurochkin@gmail.com>\r
43 X-Mailer: git-send-email 1.7.8.3\r
44 In-Reply-To: <1326806686-30642-1-git-send-email-dmitry.kurochkin@gmail.com>\r
45 References: <1326806686-30642-1-git-send-email-dmitry.kurochkin@gmail.com>\r
46 X-BeenThere: notmuch@notmuchmail.org\r
47 X-Mailman-Version: 2.1.13\r
48 Precedence: list\r
49 List-Id: "Use and development of the notmuch mail system."\r
50         <notmuch.notmuchmail.org>\r
51 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
52         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
53 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
54 List-Post: <mailto:notmuch@notmuchmail.org>\r
55 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
56 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
57         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
58 X-List-Received-Date: Tue, 17 Jan 2012 15:56:32 -0000\r
59 \r
60 This makes `show-trailing-whitespace' happy, i.e. it does not mark the\r
61 whole search box line as trailing spaces.\r
62 \r
63 Since the dot is invisible, this change makes no visible difference\r
64 for `notmuch-hello'.\r
65 ---\r
66  emacs/notmuch-hello.el |    9 ++++++---\r
67  1 files changed, 6 insertions(+), 3 deletions(-)\r
68 \r
69 diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el\r
70 index 02017ce..38846ef 100644\r
71 --- a/emacs/notmuch-hello.el\r
72 +++ b/emacs/notmuch-hello.el\r
73 @@ -508,9 +508,12 @@ Complete list of currently available key bindings:\r
74                                        (length "Search: ")))\r
75                        :action (lambda (widget &rest ignore)\r
76                                  (notmuch-hello-search (widget-value widget))))\r
77 -       ;; add an invisible space to make `widget-end-of-line' ignore\r
78 -       ;; trailine spaces in the search widget field\r
79 -       (widget-insert " ")\r
80 +       ;; Add an invisible dot to make `widget-end-of-line' ignore\r
81 +       ;; trailing spaces in the search widget field.  A dot is used\r
82 +       ;; instead of a space to make `show-trailing-whitespace'\r
83 +       ;; happy, i.e. avoid it marking the whole line as trailing\r
84 +       ;; spaces.\r
85 +       (widget-insert ".")\r
86         (put-text-property (1- (point)) (point) 'invisible t)\r
87         (widget-insert "\n")\r
88  \r
89 -- \r
90 1.7.8.3\r
91 \r