Re: [PATCH] emacs: wash: make word-wrap bound message width
[notmuch-archives.git] / 77 / 05d04af89bb560e3bc4aca95fd578cb62a2a0c
1 Return-Path: <dme@dme.org>\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 4F88E41ED6E\r
6         for <notmuch@notmuchmail.org>; Fri,  6 Jan 2012 02:03:46 -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.7\r
10 X-Spam-Level: \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 cyPFRhDZQsqZ for <notmuch@notmuchmail.org>;\r
16         Fri,  6 Jan 2012 02:03:46 -0800 (PST)\r
17 Received: from mail-we0-f181.google.com (mail-we0-f181.google.com\r
18         [74.125.82.181]) (using TLSv1 with cipher RC4-SHA (128/128 bits))\r
19         (No client certificate requested)\r
20         by olra.theworths.org (Postfix) with ESMTPS id C3DE541ED6C\r
21         for <notmuch@notmuchmail.org>; Fri,  6 Jan 2012 02:03:45 -0800 (PST)\r
22 Received: by werm12 with SMTP id m12so1175150wer.26\r
23         for <notmuch@notmuchmail.org>; Fri, 06 Jan 2012 02:03:44 -0800 (PST)\r
24 Received: by 10.216.139.156 with SMTP id c28mr2843054wej.34.1325844224384;\r
25         Fri, 06 Jan 2012 02:03:44 -0800 (PST)\r
26 Received: from hotblack-desiato.hh.sledj.net\r
27         (host81-149-164-25.in-addr.btopenworld.com. [81.149.164.25])\r
28         by mx.google.com with ESMTPS id p2sm67683522wbh.22.2012.01.06.02.03.42\r
29         (version=TLSv1/SSLv3 cipher=OTHER);\r
30         Fri, 06 Jan 2012 02:03:43 -0800 (PST)\r
31 Received: by hotblack-desiato.hh.sledj.net (Postfix, from userid 30000)\r
32         id 83FA7A01DB; Fri,  6 Jan 2012 10:03:41 +0000 (GMT)\r
33 From: David Edmondson <dme@dme.org>\r
34 To: notmuch@notmuchmail.org\r
35 Subject: [PATCH] emacs: Mark the quoted region during reply.\r
36 Date: Fri,  6 Jan 2012 10:03:40 +0000\r
37 Message-Id: <1325844220-1949-1-git-send-email-dme@dme.org>\r
38 X-Mailer: git-send-email 1.7.7.3\r
39 X-BeenThere: notmuch@notmuchmail.org\r
40 X-Mailman-Version: 2.1.13\r
41 Precedence: list\r
42 List-Id: "Use and development of the notmuch mail system."\r
43         <notmuch.notmuchmail.org>\r
44 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
45         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
46 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
47 List-Post: <mailto:notmuch@notmuchmail.org>\r
48 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
49 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
50         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
51 X-List-Received-Date: Fri, 06 Jan 2012 10:03:46 -0000\r
52 \r
53 Mark the quoted region of text during a reply, making it easy for the\r
54 user to delete it quickly.\r
55 ---\r
56  emacs/notmuch-mua.el |    3 ++-\r
57  1 files changed, 2 insertions(+), 1 deletions(-)\r
58 \r
59 diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el\r
60 index 7114e48..32e2e30 100644\r
61 --- a/emacs/notmuch-mua.el\r
62 +++ b/emacs/notmuch-mua.el\r
63 @@ -108,7 +108,8 @@ list."\r
64      (if (re-search-backward message-signature-separator nil t)\r
65           (forward-line -1)\r
66        (goto-char (point-max)))\r
67 -    (insert body))\r
68 +    (insert body)\r
69 +    (push-mark))\r
70    (set-buffer-modified-p nil)\r
71  \r
72    (message-goto-body))\r
73 -- \r
74 1.7.7.3\r
75 \r