bd/c9c48fb7d37e33be9be7606cff081f97038278

   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 454586DE0C51\r
   6  for <notmuch@notmuchmail.org>; Sat, 13 Feb 2016 08:42:42 -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.307\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=-0.307 tagged_above=-999 required=5 tests=[AWL=0.244,\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 wTpJRatp8KyU for <notmuch@notmuchmail.org>;\r
  16  Sat, 13 Feb 2016 08:42:40 -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 41A3E6DE0A9A\r
  19  for <notmuch@notmuchmail.org>; Sat, 13 Feb 2016 08:42:40 -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 1aUdGb-0003xY-Gz; Sat, 13 Feb 2016 11:41:53 -0500\r
  23 Received: (nullmailer pid 8837 invoked by uid 1000);\r
  24  Sat, 13 Feb 2016 16:42:33 -0000\r
  25 From: David Bremner <david@tethera.net>\r
  26 To: Jani Nikula <jani@nikula.org>, notmuch@notmuchmail.org\r
  27 Subject: Re: [PATCH] emacs: hello: tell the user about help and notmuch\r
  28  customization\r
  29 In-Reply-To: <1450026221-23286-1-git-send-email-jani@nikula.org>\r
  30 References: <1450026221-23286-1-git-send-email-jani@nikula.org>\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: Sat, 13 Feb 2016 12:42:33 -0400\r
  34 Message-ID: <8760xs8sue.fsf@zancas.localnet>\r
  35 MIME-Version: 1.0\r
  36 Content-Type: text/plain\r
  37 X-BeenThere: notmuch@notmuchmail.org\r
  38 X-Mailman-Version: 2.1.20\r
  39 Precedence: list\r
  40 List-Id: "Use and development of the notmuch mail system."\r
  41  <notmuch.notmuchmail.org>\r
  42 List-Unsubscribe: <https://notmuchmail.org/mailman/options/notmuch>,\r
  43  <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  44 List-Archive: <http://notmuchmail.org/pipermail/notmuch/>\r
  45 List-Post: <mailto:notmuch@notmuchmail.org>\r
  46 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  47 List-Subscribe: <https://notmuchmail.org/mailman/listinfo/notmuch>,\r
  48  <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  49 X-List-Received-Date: Sat, 13 Feb 2016 16:42:42 -0000\r
  50 \r
  51 Jani Nikula <jani@nikula.org> writes:\r
  52 \r
  53 > Make it easier for new users to find out about thing in notmuch-emacs.\r
  54 > ---\r
  55 >  emacs/notmuch-hello.el | 11 +++++++++--\r
  56 >  1 file changed, 9 insertions(+), 2 deletions(-)\r
  57 >\r
  58 > diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el\r
  59 > index b42e0f24148a..738baad23b20 100644\r
  60 > --- a/emacs/notmuch-hello.el\r
  61 > +++ b/emacs/notmuch-hello.el\r
  62 > @@ -915,12 +915,19 @@ following:\r
  63 >        (widget-insert "Edit saved searches with the `edit' button.\n"))\r
  64 >      (widget-insert "Hit RET or click on a saved search or tag name to view matching threads.\n")\r
  65 >      (widget-insert "`=' to refresh this screen. `s' to search messages. `q' to quit.\n")\r
  66 > +    (widget-insert "`?' in each Notmuch screen to display help for the current mode.\n")\r
  67 > +    (widget-insert "Customize ")\r
  68 > +    (widget-create 'link\r
  69 > +                :notify (lambda (&rest ignore)\r
  70 > +                          (customize-group 'notmuch))\r
  71 > +                :button-prefix "" :button-suffix ""\r
  72 > +                "Notmuch")\r
  73 > +    (widget-insert " or ")\r
  74 >      (widget-create 'link\r
  75 >                  :notify (lambda (&rest ignore)\r
  76 >                            (customize-variable 'notmuch-hello-sections))\r
  77 >                  :button-prefix "" :button-suffix ""\r
  78 > -                "Customize")\r
  79 > -    (widget-insert " this page.")\r
  80 > +                "this page.")\r
  81 >      (let ((fill-column (- (window-width) notmuch-hello-indent)))\r
  82 >        (center-region start (point)))))\r
  83 \r
  84 Unfortunately this breaks some tests.\r
  85 \r
  86 d\r