30/4ab19f26f02432f5c585989d04122bcaa7bb37

   1 Return-Path: <tomi.ollila@iki.fi>\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 7F294431FC2\r
   6         for <notmuch@notmuchmail.org>; Thu, 16 Aug 2012 00:43:58 -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\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=0 tagged_above=-999 required=5 tests=[none]\r
  12         autolearn=disabled\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 V6++5BcyRtxs for <notmuch@notmuchmail.org>;\r
  16         Thu, 16 Aug 2012 00:43:57 -0700 (PDT)\r
  17 Received: from guru.guru-group.fi (guru.guru-group.fi [46.183.73.34])\r
  18         by olra.theworths.org (Postfix) with ESMTP id 99683431FB6\r
  19         for <notmuch@notmuchmail.org>; Thu, 16 Aug 2012 00:43:57 -0700 (PDT)\r
  20 Received: by guru.guru-group.fi (Postfix, from userid 501)\r
  21         id 48749100637; Thu, 16 Aug 2012 10:44:05 +0300 (EEST)\r
  22 From: Tomi Ollila <tomi.ollila@iki.fi>\r
  23 To: Austin Clements <amdragon@MIT.EDU>\r
  24 Subject: Re: [PATCH 2/2] test: emacs: run list-processes after\r
  25         accept-process-output in emacs 23.1\r
  26 In-Reply-To: <20120813151613.GN11179@mit.edu>\r
  27 References: <1344165182-29246-1-git-send-email-tomi.ollila@iki.fi>\r
  28         <1344165182-29246-2-git-send-email-tomi.ollila@iki.fi>\r
  29         <20120813151613.GN11179@mit.edu>\r
  30 User-Agent: Notmuch/0.13.2+128~g2eb637a (http://notmuchmail.org) Emacs/23.1.1\r
  31         (x86_64-redhat-linux-gnu)\r
  32 X-Face: HhBM'cA~<r"^Xv\KRN0P{vn'Y"Kd;zg_y3S[4)KSN~s?O\"QPoL\r
  33         $[Xv_BD:i/F$WiEWax}R(MPS`^UaptOGD`*/=@\1lKoVa9tnrg0TW?"r7aRtgk[F\r
  34         !)g;OY^,BjTbr)Np:%c_o'jj,Z\r
  35 Date: Thu, 16 Aug 2012 10:44:05 +0300\r
  36 Message-ID: <m27gsz2se2.fsf@guru.guru-group.fi>\r
  37 MIME-Version: 1.0\r
  38 Content-Type: text/plain; charset=us-ascii\r
  39 Cc: notmuch@notmuchmail.org\r
  40 X-BeenThere: notmuch@notmuchmail.org\r
  41 X-Mailman-Version: 2.1.13\r
  42 Precedence: list\r
  43 List-Id: "Use and development of the notmuch mail system."\r
  44         <notmuch.notmuchmail.org>\r
  45 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
  46         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  47 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
  48 List-Post: <mailto:notmuch@notmuchmail.org>\r
  49 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  50 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
  51         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  52 X-List-Received-Date: Thu, 16 Aug 2012 07:43:58 -0000\r
  53 \r
  54 On Mon, Aug 13 2012, Austin Clements <amdragon@MIT.EDU> wrote:\r
  55 \r
  56 > Quoth Tomi Ollila on Aug 05 at  2:13 pm:\r
  57 >> When running emacs tests using emacs 23.1.1 the tests block (until timeout)\r
  58 >> when emacs function (notmuch-test-wait) is called.\r
  59 >> \r
  60 >> There is an emacs bug #2930 titled:\r
  61 >> 23.0.92; `accept-process-output' and `sleep-for' do not run sentinel\r
  62 >> \r
  63 >> It seems this is present in emacs 23.1.\r
  64 >> \r
  65 >> Calling list-processes after accept-process-output seems work around\r
  66 >> this problem; in case Emacs version is 23.1 a defadvice is activated\r
  67 >> to do just that.\r
  68 >\r
  69 > Should this workaround perhaps go in notmuch-test-wait directly,\r
  70 > instead of being implemented as advice?  \r
  71 \r
  72 This way the fact that this is workaround for bug that exists only in\r
  73 23.1(*) is emphasized; The notmuch-test-wait can exist in a (simpler)\r
  74 format where it doesn't need to know about this bug.\r
  75 \r
  76 (*) This bug probably exists in emacs 22 but the MUA has not worked\r
  77 on emacs 22 at least for a year now.\r
  78 \r
  79 > If we do want to keep it as advice, should it go in notmuch-lib.el\r
  80 > along with the few other compatibility functions?\r
  81 \r
  82 In tests we have fixed environment where we can write workarounds\r
  83 as "global" advices. If we did this in notmuch-lib.el we'd be changing\r
  84 users' environment, possibly causing surprises...\r
  85 \r
  86 ... but neither sleep-for or accept-process-output are used in \r
  87 any of the notmuch elisp code so such "fixes" are not needed now...\r
  88 \r
  89 ... and this would ever be a problem, we might already support only\r
  90 emacs 24 or newer >;) ...\r
  91 \r
  92 Tomi\r
  93 \r
  94 >> ---\r
  95 >> \r
  96 >> Thanks to Austin for the comments and IRC discussions on the matter.\r
  97 >> \r
  98 >>  test/test-lib.el |    8 ++++++++\r
  99 >>  1 files changed, 8 insertions(+), 0 deletions(-)\r
 100 >> \r
 101 >> diff --git a/test/test-lib.el b/test/test-lib.el\r
 102 >> index 52d9936..4330352 100644\r
 103 >> --- a/test/test-lib.el\r
 104 >> +++ b/test/test-lib.el\r
 105 >> @@ -35,6 +35,16 @@\r
 106 >>      "Disable yes-or-no-p before executing kill-emacs"\r
 107 >>      (defun yes-or-no-p (prompt) t)))\r
 108 >>  \r
 109 >> +;; Emacs bug #2930:\r
 110 >> +;;  23.0.92; `accept-process-output' and `sleep-for' do not run sentinels\r
 111 >> +;; seems to be present in Emacs 23.1.\r
 112 >> +;; Running `list-processes' after `accept-process-output' seems to work\r
 113 >> +;; around this problem.\r
 114 >> +(if (and (= emacs-major-version 23) (= emacs-minor-version 1))\r
 115 >> +  (defadvice accept-process-output (after run-list-processes activate)\r
 116 >> +    "run list-processes after executing accept-process-output"\r
 117 >> +    (list-processes)))\r
 118 >> +\r
 119 >>  (defun notmuch-test-wait ()\r
 120 >>    "Wait for process completion."\r
 121 >>    (while (get-buffer-process (current-buffer))\r
 122 > _______________________________________________\r
 123 > notmuch mailing list\r
 124 > notmuch@notmuchmail.org\r
 125 > http://notmuchmail.org/mailman/listinfo/notmuch\r