From ab9b343049e523979bc39fd040baea33ec2d0c37 Mon Sep 17 00:00:00 2001 From: Tomi Ollila Date: Sun, 10 Apr 2016 10:24:21 +0300 Subject: [PATCH] Re: [PATCH] emacs: make use of `message-make-from' --- 14/9204faba8b245f70ad46a3f03567aa280f310c | 100 ++++++++++++++++++++++ 1 file changed, 100 insertions(+) create mode 100644 14/9204faba8b245f70ad46a3f03567aa280f310c diff --git a/14/9204faba8b245f70ad46a3f03567aa280f310c b/14/9204faba8b245f70ad46a3f03567aa280f310c new file mode 100644 index 000000000..236abe2b3 --- /dev/null +++ b/14/9204faba8b245f70ad46a3f03567aa280f310c @@ -0,0 +1,100 @@ +Return-Path: +X-Original-To: notmuch@notmuchmail.org +Delivered-To: notmuch@notmuchmail.org +Received: from localhost (localhost [127.0.0.1]) + by arlo.cworth.org (Postfix) with ESMTP id A08656DE02BF + for ; Sun, 10 Apr 2016 00:24:29 -0700 (PDT) +X-Virus-Scanned: Debian amavisd-new at cworth.org +X-Spam-Flag: NO +X-Spam-Score: 0.622 +X-Spam-Level: +X-Spam-Status: No, score=0.622 tagged_above=-999 required=5 tests=[AWL=-0.030, + SPF_NEUTRAL=0.652] autolearn=disabled +Received: from arlo.cworth.org ([127.0.0.1]) + by localhost (arlo.cworth.org [127.0.0.1]) (amavisd-new, port 10024) + with ESMTP id kOmH4pqQfmUl for ; + Sun, 10 Apr 2016 00:24:21 -0700 (PDT) +Received: from guru.guru-group.fi (guru.guru-group.fi [46.183.73.34]) + by arlo.cworth.org (Postfix) with ESMTP id C06BD6DE00BD + for ; Sun, 10 Apr 2016 00:24:19 -0700 (PDT) +Received: from guru.guru-group.fi (localhost [IPv6:::1]) + by guru.guru-group.fi (Postfix) with ESMTP id 325F9100090; + Sun, 10 Apr 2016 10:24:21 +0300 (EEST) +From: Tomi Ollila +To: aeuii@posteo.de, notmuch@notmuchmail.org +Subject: Re: [PATCH] emacs: make use of `message-make-from' +In-Reply-To: <86h9fbwzcw.fsf@posteo.de> +References: <86h9fbwzcw.fsf@posteo.de> +User-Agent: Notmuch/0.21+99~g7cbc880 (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.20 +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: Sun, 10 Apr 2016 07:24:29 -0000 + +On Sat, Apr 09 2016, aeuii@posteo.de wrote: + +> Please put my address in CC when replying. Thanks! +> +> From 4b9ab261a0ea8a31065e310c5150f522be86d37b Mon Sep 17 00:00:00 2001 +> From: stefan +> Date: Fri, 8 Apr 2016 22:47:06 +0200 +> Subject: [PATCH] emacs: make use of `message-make-from' +> +> Will respect `mail-from-style'. + +LTGM + +Tomi + +> --- +> emacs/notmuch-mua.el | 6 +++--- +> 1 file changed, 3 insertions(+), 3 deletions(-) +> +> diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el +> index cfdac0e..935cbd3 100644 +> --- a/emacs/notmuch-mua.el +> +++ b/emacs/notmuch-mua.el +> @@ -318,8 +318,8 @@ modified. This function is notmuch addaptation of +> (push (cons 'User-Agent user-agent) other-headers)))) +> +> (unless (assq 'From other-headers) +> - (push (cons 'From (concat +> - (notmuch-user-name) " <" (notmuch-user-primary-email) ">")) other-headers)) +> + (push (cons 'From (message-make-from +> + (notmuch-user-name) (notmuch-user-primary-email))) other-headers)) +> +> (notmuch-mua-pop-to-buffer (message-buffer-name "mail" to) +> (or switch-function (notmuch-mua-get-switch-function))) +> @@ -393,7 +393,7 @@ the From: header is already filled in by notmuch." +> (ido-completing-read (concat "Sender address for " name ": ") addrs +> nil nil nil 'notmuch-mua-sender-history +> (car addrs)))) +> - (concat name " <" address ">")))) +> + (message-make-from name address)))) +> +> (put 'notmuch-mua-new-mail 'notmuch-prefix-doc "... and prompt for sender") +> (defun notmuch-mua-new-mail (&optional prompt-for-sender) +> -- +> 2.7.4 +> +> _______________________________________________ +> notmuch mailing list +> notmuch@notmuchmail.org +> https://notmuchmail.org/mailman/listinfo/notmuch -- 2.26.2