96/f1ea8f72235a462add3f02e674282c8345220f

   1 Return-Path: <david@tethera.net>\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 arlo.cworth.org (Postfix) with ESMTP id 183F66DE176C\r
   6  for <notmuch@notmuchmail.org>; Mon,  4 Jan 2016 18:33:19 -0800 (PST)\r
   7 X-Virus-Scanned: Debian amavisd-new at cworth.org\r
   8 X-Spam-Flag: NO\r
   9 X-Spam-Score: -0.31\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=-0.31 tagged_above=-999 required=5 tests=[AWL=0.241, \r
  12  RP_MATCHES_RCVD=-0.55, SPF_PASS=-0.001] autolearn=disabled\r
  13 Received: from arlo.cworth.org ([127.0.0.1])\r
  14  by localhost (arlo.cworth.org [127.0.0.1]) (amavisd-new, port 10024)\r
  15  with ESMTP id 02vDvfdC8VtQ for <notmuch@notmuchmail.org>;\r
  16  Mon,  4 Jan 2016 18:33:16 -0800 (PST)\r
  17 Received: from fethera.tethera.net (fethera.tethera.net [198.245.60.197])\r
  18  by arlo.cworth.org (Postfix) with ESMTPS id 978266DE176A\r
  19  for <notmuch@notmuchmail.org>; Mon,  4 Jan 2016 18:33:16 -0800 (PST)\r
  20 Received: from remotemail by fethera.tethera.net with local (Exim 4.84)\r
  21  (envelope-from <david@tethera.net>)\r
  22  id 1aGHQl-0003GA-DP; Mon, 04 Jan 2016 21:33:03 -0500\r
  23 Received: (nullmailer pid 2722 invoked by uid 1000);\r
  24  Tue, 05 Jan 2016 02:33:09 -0000\r
  25 From: David Bremner <david@tethera.net>\r
  26 To: Michal Sojka <sojkam1@fel.cvut.cz>, notmuch@notmuchmail.org\r
  27 Subject: Re: [PATCH 1/3] emacs: Fix mail composition under Emacs 23\r
  28 In-Reply-To: <1451753265-26713-2-git-send-email-sojkam1@fel.cvut.cz>\r
  29 References: <1451753265-26713-1-git-send-email-sojkam1@fel.cvut.cz>\r
  30  <1451753265-26713-2-git-send-email-sojkam1@fel.cvut.cz>\r
  31 User-Agent: Notmuch/0.21+26~g9404723 (http://notmuchmail.org) Emacs/24.5.1\r
  32  (x86_64-pc-linux-gnu)\r
  33 Date: Mon, 04 Jan 2016 22:33:09 -0400\r
  34 Message-ID: <8760z8ah7e.fsf@zancas.localnet>\r
  35 MIME-Version: 1.0\r
  36 Content-Type: text/plain; charset=utf-8\r
  37 Content-Transfer-Encoding: quoted-printable\r
  38 X-BeenThere: notmuch@notmuchmail.org\r
  39 X-Mailman-Version: 2.1.20\r
  40 Precedence: list\r
  41 List-Id: "Use and development of the notmuch mail system."\r
  42  <notmuch.notmuchmail.org>\r
  43 List-Unsubscribe: <https://notmuchmail.org/mailman/options/notmuch>,\r
  44  <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  45 List-Archive: <http://notmuchmail.org/pipermail/notmuch/>\r
  46 List-Post: <mailto:notmuch@notmuchmail.org>\r
  47 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  48 List-Subscribe: <https://notmuchmail.org/mailman/listinfo/notmuch>,\r
  49  <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  50 X-List-Received-Date: Tue, 05 Jan 2016 02:33:19 -0000\r
  51 \r
  52 Michal Sojka <sojkam1@fel.cvut.cz> writes:\r
  53 \r
  54 > +    (when return-action (nconc args '(return-action)))\r
  55 > +    (apply 'message-setup-1\r
  56 > +        ;; The following sexp is copied from `message-mail'\r
  57 \r
  58 > +        (nconc\r
  59 > +         `((To . ,(or to "")) (Subject . ,(or subject "")))\r
  60 \r
  61 I missed this the first time, but I a bit worried about this used of\r
  62 nconc. It seems to fall under "A common pitfall is to use a quoted\r
  63 constant list as a non-last argument to =E2=80=98nconc=E2=80=99"  (from the=\r
  64  elisp\r
  65 manual).  In any case it's not really performance critical code (I\r
  66 guess?) so maybe we could just use append?\r
  67 \r
  68 The other use of nconc is more understandable to me.\r