From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp2 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id qD28Nb8Ixl+mWQAA0tVLHw (envelope-from ) for ; Tue, 01 Dec 2020 09:11:27 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp2 with LMTPS id WBKRMb8Ixl8CDAAAB5/wlQ (envelope-from ) for ; Tue, 01 Dec 2020 09:11:27 +0000 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id B15389404FE for ; Tue, 1 Dec 2020 09:11:27 +0000 (UTC) Received: from localhost ([::1]:53748 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kk1h0-00014Y-50 for larch@yhetil.org; Tue, 01 Dec 2020 04:11:26 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:47356) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kk1gh-00014H-O9 for help-guix@gnu.org; Tue, 01 Dec 2020 04:11:08 -0500 Received: from relay4-d.mail.gandi.net ([217.70.183.196]:43415) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kk1gc-0007eP-AZ for help-guix@gnu.org; Tue, 01 Dec 2020 04:11:05 -0500 X-Originating-IP: 90.92.160.122 Received: from bababa (lfbn-idf2-1-1094-122.w90-92.abo.wanadoo.fr [90.92.160.122]) (Authenticated sender: mail@ambrevar.xyz) by relay4-d.mail.gandi.net (Postfix) with ESMTPSA id 771CBE0007; Tue, 1 Dec 2020 09:10:57 +0000 (UTC) From: Pierre Neidhardt To: Kyle Meyer Subject: Re: Workflow with mu4e + magit for sending patchsets to guix? In-Reply-To: <87k0u2lboq.fsf@kyleam.com> References: <87ima5f3mi.fsf@dustycloud.org> <86eeksq2v4.fsf@gmail.com> <877dqkpv4t.fsf@kyleam.com> <87pn4ca1c7.fsf@ambrevar.xyz> <86zh3gnkew.fsf@gmail.com> <87k0u9x075.fsf@ambrevar.xyz> <86a6v5ty39.fsf@gmail.com> <87k0u8v42a.fsf@ambrevar.xyz> <87k0u2lboq.fsf@kyleam.com> Date: Tue, 01 Dec 2020 10:10:56 +0100 Message-ID: <874kl5dh7j.fsf@ambrevar.xyz> MIME-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha256; protocol="application/pgp-signature" Received-SPF: pass client-ip=217.70.183.196; envelope-from=mail@ambrevar.xyz; helo=relay4-d.mail.gandi.net X-Spam_score_int: 2 X-Spam_score: 0.2 X-Spam_bar: / X-Spam_report: (0.2 / 5.0 requ) BAYES_00=-1.9, FROM_SUSPICIOUS_NTLD=0.498, PDS_OTHER_BAD_TLD=1.599, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H3=0.001, RCVD_IN_MSPIKE_WL=0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=no autolearn_force=no X-Spam_action: no action X-BeenThere: help-guix@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: help-guix@gnu.org Errors-To: help-guix-bounces+larch=yhetil.org@gnu.org Sender: "Help-Guix" X-Migadu-Flow: FLOW_IN X-Migadu-Spam-Score: -4.00 Authentication-Results: aspmx1.migadu.com; none X-Migadu-Queue-Id: B15389404FE X-Spam-Score: -4.00 X-Migadu-Scanner: ns3122888.ip-94-23-21.eu X-TUID: fa8mYbkZt0Ii --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable Ah! That's good to know! So here is my final, hopefully fully-functioning version then: =2D-8<---------------cut here---------------start------------->8--- (defvar ambrevar/known-mailing-list-archives '(("help-guix@gnu.org" . "guix") ("guix-devel@gnu.org" . "guix") ("debbugs.gnu.org" . "guix")) "Alist of mail adresses and their Yhetil name. Alternatively the key may just be a host name against which a recipient will be matched.") (defun ambrevar/guess-yhetil-link (message-id) (let* ((all-addresses (mapcar #'second (mail-extract-address-components (mapconcat #'identity (list (notmuch-show-get-header :To) (notmuch-show-get-header :Cc)) ", ") 'all))) (match-address (lambda (address-or-host) (if (string-match "@" address-or-host) (member address-or-host all-addresses) (seq-find (lambda (address) (string-match address-or-host addre= ss)) all-addresses)))) (mailing-list (alist-get (seq-find match-address (mapcar #'car ambrevar/known-mailing-list= -archives)) ambrevar/known-mailing-list-archives nil nil #'string=3D))) (when mailing-list (concat "https://yhetil.org/" mailing-list "/" message-id)))) (add-to-list 'notmuch-show-stash-mlarchive-link-alist (cons "Yhetil" #'ambrevar/guess-yhetil-link)) (setq notmuch-show-stash-mlarchive-link-default "Yhetil") =2D-8<---------------cut here---------------end--------------->8--- Cheers! =2D-=20 Pierre Neidhardt https://ambrevar.xyz/ --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQFFBAEBCAAwFiEEUPM+LlsMPZAEJKvom9z0l6S7zH8FAl/GCKASHG1haWxAYW1i cmV2YXIueHl6AAoJEJvc9Jeku8x/OQMH+PNv4NLFrXNW0l5qwULtEkjq6elZdTSi N3Q15niMkKA9oygA9SssX/HGN83Q214oBWOKWtEPU7bI2rRpT3WOXF4sb9Q5R8uq PXtaGo3n8OPuGV0GYtJtbC3PEAiQaxYCZeALAnk2qSdPKMz1xtPkcfa0ByyMrL+l INHO884Tj/9ULqzYx7dIpiYirX97yvRc9iU9JiX9g754/Zet4LiLL/i4IXPlkVb7 gKh0Uu9AamiLj/e+7Ljp7pff99zrr3+zKi7t4lqPfcyg+hx+rYRq1Ia9GlzzN5W4 HO8QemCXY7UUaKPO9ml7FOjYAQECRfPdlm75IXCDkM37QHptWivzgw== =46mV -----END PGP SIGNATURE----- --=-=-=--