ad/2977b8d82cd1064a99375857a497512e6fd20a

   1 Return-Path: <davidben@mit.edu>\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 olra.theworths.org (Postfix) with ESMTP id 4B3904196F0\r
   6         for <notmuch@notmuchmail.org>; Sat, 29 May 2010 11:02:03 -0700 (PDT)\r
   7 X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
   8 X-Spam-Flag: NO\r
   9 X-Spam-Score: -0.001\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=-0.001 tagged_above=-999 required=5\r
  12         tests=[BAYES_20=-0.001] autolearn=ham\r
  13 Received: from olra.theworths.org ([127.0.0.1])\r
  14         by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
  15         with ESMTP id Ff1WDL4X4dNB for <notmuch@notmuchmail.org>;\r
  16         Sat, 29 May 2010 11:01:53 -0700 (PDT)\r
  17 Received: from dmz-mailsec-scanner-3.mit.edu (DMZ-MAILSEC-SCANNER-3.MIT.EDU\r
  18         [18.9.25.14])\r
  19         by olra.theworths.org (Postfix) with ESMTP id 1D82C431FC1\r
  20         for <notmuch@notmuchmail.org>; Sat, 29 May 2010 11:01:53 -0700 (PDT)\r
  21 X-AuditID: 1209190e-b7b82ae000005260-8f-4c01568f6648\r
  22 Received: from mailhub-auth-4.mit.edu (MAILHUB-AUTH-4.MIT.EDU [18.7.62.39])\r
  23         by dmz-mailsec-scanner-3.mit.edu (Symantec Brightmail Gateway) with\r
  24         SMTP id E9.72.21088.F86510C4; Sat, 29 May 2010 14:01:51 -0400 (EDT)\r
  25 Received: from outgoing.mit.edu (OUTGOING-AUTH.MIT.EDU [18.7.22.103])\r
  26         by mailhub-auth-4.mit.edu (8.13.8/8.9.2) with ESMTP id o4TI1ovS030186; \r
  27         Sat, 29 May 2010 14:01:51 -0400\r
  28 Received: from localhost (DR-WILY.MIT.EDU [18.181.0.233])\r
  29         (authenticated bits=0)\r
  30         (User authenticated as davidben@ATHENA.MIT.EDU)\r
  31         by outgoing.mit.edu (8.13.6/8.12.4) with ESMTP id o4TI1nIQ011736;\r
  32         Sat, 29 May 2010 14:01:50 -0400 (EDT)\r
  33 Date: Sat, 29 May 2010 14:01:49 -0400 (EDT)\r
  34 From: David A Benjamin <davidben@MIT.EDU>\r
  35 To: Christopher League <league@contrapunctus.net>\r
  36 Subject: Re: [PATCH] quoting message-IDs for the shell\r
  37 In-Reply-To: <87bpbztwcy.fsf@contrapunctus.net>\r
  38 Message-ID: <alpine.DEB.1.10.1005291354320.29237@dr-wily.mit.edu>\r
  39 References: <87bpbztwcy.fsf@contrapunctus.net>\r
  40 User-Agent: Alpine 1.10 (DEB 962 2008-03-14)\r
  41 MIME-Version: 1.0\r
  42 Content-Type: TEXT/PLAIN; charset=US-ASCII; format=flowed\r
  43 X-Brightmail-Tracker: AAAAARRlSuo=\r
  44 Cc: notmuch@notmuchmail.org\r
  45 X-BeenThere: notmuch@notmuchmail.org\r
  46 X-Mailman-Version: 2.1.13\r
  47 Precedence: list\r
  48 List-Id: "Use and development of the notmuch mail system."\r
  49         <notmuch.notmuchmail.org>\r
  50 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
  51         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  52 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
  53 List-Post: <mailto:notmuch@notmuchmail.org>\r
  54 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  55 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
  56         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  57 X-List-Received-Date: Sat, 29 May 2010 18:02:03 -0000\r
  58 \r
  59 On Fri, 28 May 2010, Christopher League wrote:\r
  60 \r
  61 > @@ -915,7 +919,7 @@ to stdout or stderr will appear in the *Messages* buffer."\r
  62 >   (apply 'notmuch-call-notmuch-process\r
  63 >        (append (cons "tag"\r
  64 >                      (mapcar (lambda (s) (concat "+" s)) toadd))\r
  65 > -              (cons (notmuch-show-get-message-id) nil)))\r
  66 > +              (cons (notmuch-show-quoted-message-id) nil)))\r
  67 >   (notmuch-show-set-tags (sort (union toadd (notmuch-show-get-tags) :test 'string=) 'string<)))\r
  68 >\r
  69 > (defun notmuch-show-remove-tag (&rest toremove)\r
  70 > @@ -929,7 +933,7 @@ to stdout or stderr will appear in the *Messages* buffer."\r
  71 >         (apply 'notmuch-call-notmuch-process\r
  72 >                (append (cons "tag"\r
  73 >                              (mapcar (lambda (s) (concat "-" s)) toremove))\r
  74 > -                      (cons (notmuch-show-get-message-id) nil)))\r
  75 > +                      (cons (notmuch-show-quoted-message-id) nil)))\r
  76 >         (notmuch-show-set-tags (sort (set-difference tags toremove :test 'string=) 'string<))))))\r
  77 >\r
  78 \r
  79 Hrm. Are you sure? notmuch-call-notmuch-process is implemented using \r
  80 call-process, which doesn't seem to invoke the shell.\r
  81 \r
  82 David Benjamin\r