Return-Path: X-Original-To: notmuch@notmuchmail.org Delivered-To: notmuch@notmuchmail.org Received: from localhost (localhost [127.0.0.1]) by olra.theworths.org (Postfix) with ESMTP id 883A8431FAF for ; Mon, 2 Jun 2014 05:55:56 -0700 (PDT) X-Virus-Scanned: Debian amavisd-new at olra.theworths.org X-Spam-Flag: NO X-Spam-Score: 0 X-Spam-Level: X-Spam-Status: No, score=0 tagged_above=-999 required=5 tests=[none] autolearn=disabled Received: from olra.theworths.org ([127.0.0.1]) by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id tFCZNbwZ66Om for ; Mon, 2 Jun 2014 05:55:48 -0700 (PDT) Received: from guru.guru-group.fi (guru.guru-group.fi [46.183.73.34]) by olra.theworths.org (Postfix) with ESMTP id 7ED85431FAE for ; Mon, 2 Jun 2014 05:55:48 -0700 (PDT) Received: from guru.guru-group.fi (localhost [IPv6:::1]) by guru.guru-group.fi (Postfix) with ESMTP id B876110005E; Mon, 2 Jun 2014 15:55:31 +0300 (EEST) From: Tomi Ollila To: David Edmondson , notmuch@notmuchmail.org Subject: Re: [PATCH v1] emacs: Forwarded messages should not have modified buffers In-Reply-To: References: User-Agent: Notmuch/0.18+28~gcecaba1 (http://notmuchmail.org) Emacs/24.3.1 (x86_64-unknown-linux-gnu) X-Face: HhBM'cA~ MIME-Version: 1.0 Content-Type: text/plain X-BeenThere: notmuch@notmuchmail.org X-Mailman-Version: 2.1.13 Precedence: list List-Id: "Use and development of the notmuch mail system." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Mon, 02 Jun 2014 12:55:56 -0000 On Mon, Jun 02 2014, David Edmondson wrote: > When the user begins forwarding a message, the resulting composition > buffer should not be marked as modified, in order that it can > immediately be killed without prompting. > --- LGTM. Tomi > emacs/notmuch-mua.el | 3 ++- > 1 file changed, 2 insertions(+), 1 deletion(-) > > diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el > index 95e4a4d..2c58886 100644 > --- a/emacs/notmuch-mua.el > +++ b/emacs/notmuch-mua.el > @@ -346,7 +346,8 @@ the From: address first." > (message-forward-make-body cur) > ;; `message-forward-make-body' shows the User-agent header. Hide > ;; it again. > - (message-hide-headers))) > + (message-hide-headers) > + (set-buffer-modified-p nil))) > > (defun notmuch-mua-new-reply (query-string &optional prompt-for-sender reply-all) > "Compose a reply to the message identified by QUERY-STRING. > -- > 2.0.0.rc2 > > _______________________________________________ > notmuch mailing list > notmuch@notmuchmail.org > http://notmuchmail.org/mailman/listinfo/notmuch