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 50C5E431FB6 for ; Fri, 27 Jan 2012 01:18:51 -0800 (PST) X-Virus-Scanned: Debian amavisd-new at olra.theworths.org X-Spam-Flag: NO X-Spam-Score: -0.677 X-Spam-Level: X-Spam-Status: No, score=-0.677 tagged_above=-999 required=5 tests=[HS_INDEX_PARAM=0.023, RCVD_IN_DNSWL_LOW=-0.7] 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 k7NynjqQW8kU for ; Fri, 27 Jan 2012 01:18:50 -0800 (PST) Received: from mail-ww0-f41.google.com (mail-ww0-f41.google.com [74.125.82.41]) (using TLSv1 with cipher RC4-SHA (128/128 bits)) (No client certificate requested) by olra.theworths.org (Postfix) with ESMTPS id 721AE431FAE for ; Fri, 27 Jan 2012 01:18:50 -0800 (PST) Received: by wgbdt11 with SMTP id dt11so874702wgb.2 for ; Fri, 27 Jan 2012 01:18:49 -0800 (PST) Received: by 10.180.83.104 with SMTP id p8mr10220188wiy.4.1327655927895; Fri, 27 Jan 2012 01:18:47 -0800 (PST) Received: from hotblack-desiato.hh.sledj.net (host81-149-164-25.in-addr.btopenworld.com. [81.149.164.25]) by mx.google.com with ESMTPS id ho4sm10362247wib.3.2012.01.27.01.18.45 (version=TLSv1/SSLv3 cipher=OTHER); Fri, 27 Jan 2012 01:18:46 -0800 (PST) Received: by hotblack-desiato.hh.sledj.net (Postfix, from userid 30000) id 94016A0363; Fri, 27 Jan 2012 09:18:44 +0000 (GMT) To: Pieter Praet Subject: Re: [PATCH v4?] emacs: add `notmuch-show-stash-mlarchive-link{, -and-go}' In-Reply-To: <1327653866-30084-1-git-send-email-pieter@praet.org> References: <878vkt35ao.fsf@praet.org> <1327653866-30084-1-git-send-email-pieter@praet.org> User-Agent: Notmuch/0.11+122~g97bdcf6 (http://notmuchmail.org) Emacs/24.0.92.1 (x86_64-pc-linux-gnu) From: David Edmondson Date: Fri, 27 Jan 2012 09:18:40 +0000 Message-ID: MIME-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" Cc: Notmuch Mail 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: Fri, 27 Jan 2012 09:18:51 -0000 --=-=-= Content-Type: text/plain Much nicer :-) On Fri, 27 Jan 2012 09:44:26 +0100, Pieter Praet wrote: > +(defcustom notmuch-show-stash-mlarchive-link-alist > + '(("Gmane" . "http://mid.gmane.org/") > + ("MARC" . "http://marc.info/?i=") > + ("Mail Archive, The" . "http://mail-archive.com/search?l=mid&q=") > + ;; FIXME: can these services be searched by `Message-Id' ? > + ;; ("MarkMail" . "http://markmail.org/") > + ;; ("Nabble" . "http://nabble.com/") > + ;; ("opensubscriber" . "http://opensubscriber.com/") > + ) > + "List of Mailing List Archives to use when stashing links." > + :type '(alist :key-type (string :tag "Name") > + :value-type (string :tag "URL")) > + :group 'notmuch-show) Add a comment saying that the URI is the result of concatenating this with the message id. If someone wants to do something more complicated they can submit another patch (maybe it should be an option to have the `cdr' be a function that is called with the message id as an argument?). > + (substring (notmuch-show-get-message-id) 4 -1)))) We should put this logic in one place and re-use it. --=-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.11 (GNU/Linux) iEYEARECAAYFAk8ia/EACgkQaezQq/BJZRZ83wCeN93z/bH5CCK0TMTkg2LyOzAq yI0AnAopuoigRR/faogTOHUNPLFlTMg9 =wB7P -----END PGP SIGNATURE----- --=-=-=--