Re: [PATCH 1/2] emacs: notmuch-hello: Avoid going to end-of-line in search box

diff --git a/e4/5a2281174feb4cdcf2cc3db9fc6d8fe0807d00 b/e4/5a2281174feb4cdcf2cc3db9fc6d8fe0807d00
new file mode 100644 (file)
index 0000000..daa5626
--- /dev/null
+++ b/e4/5a2281174feb4cdcf2cc3db9fc6d8fe0807d00
@@ -0,0 +1,106 @@
+Return-Path: <pieter@praet.org>\r
+X-Original-To: notmuch@notmuchmail.org\r
+Delivered-To: notmuch@notmuchmail.org\r
+Received: from localhost (localhost [127.0.0.1])\r
+       by olra.theworths.org (Postfix) with ESMTP id 2853A431FB6\r
+       for <notmuch@notmuchmail.org>; Sat, 16 Apr 2011 06:07:09 -0700 (PDT)\r
+X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
+X-Spam-Flag: NO\r
+X-Spam-Score: 0\r
+X-Spam-Level: \r
+X-Spam-Status: No, score=0 tagged_above=-999 required=5 tests=[none]\r
+       autolearn=disabled\r
+Received: from olra.theworths.org ([127.0.0.1])\r
+       by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
+       with ESMTP id Qh7RsJfTzg3K for <notmuch@notmuchmail.org>;\r
+       Sat, 16 Apr 2011 06:07:05 -0700 (PDT)\r
+Received: from mail-ww0-f45.google.com (mail-ww0-f45.google.com\r
+ [74.125.82.45])       (using TLSv1 with cipher RC4-SHA (128/128 bits))        (No client\r
+ certificate requested)        by olra.theworths.org (Postfix) with ESMTPS id\r
+ 17D28431FB5   for <notmuch@notmuchmail.org>; Sat, 16 Apr 2011 06:07:04 -0700\r
+ (PDT)\r
+Received: by wwi36 with SMTP id 36so3684076wwi.2\r
+       for <notmuch@notmuchmail.org>; Sat, 16 Apr 2011 06:07:04 -0700 (PDT)\r
+Received: by 10.227.59.134 with SMTP id l6mr3055901wbh.34.1302959223891;\r
+       Sat, 16 Apr 2011 06:07:03 -0700 (PDT)\r
+Received: from localhost (99.28-240-81.adsl-dyn.isp.belgacom.be\r
+ [81.240.28.99])       by mx.google.com with ESMTPS id\r
+ l24sm2161812wbc.30.2011.04.16.06.07.01        (version=TLSv1/SSLv3 cipher=OTHER);\r
+       Sat, 16 Apr 2011 06:07:02 -0700 (PDT)\r
+From: Pieter Praet <pieter@praet.org>\r
+To: Kan-Ru Chen <kanru@kanru.info>, notmuch@notmuchmail.org\r
+Subject: Re: [PATCH 1/2] emacs: notmuch-hello: Avoid going to end-of-line in\r
+       search box\r
+In-Reply-To: <1280195325-9066-2-git-send-email-kanru@kanru.info>\r
+References: <1280195325-9066-1-git-send-email-kanru@kanru.info>\r
+       <1280195325-9066-2-git-send-email-kanru@kanru.info>\r
+User-Agent: Notmuch/0.5-86-g4875299 (http://notmuchmail.org) Emacs/23.1.50.1\r
+       (x86_64-pc-linux-gnu)\r
+Date: Sat, 16 Apr 2011 15:07:00 +0200\r
+Message-ID:\r
+ <87zknquyyz.fsf@A7GMS.i-did-not-set--mail-host-address--so-tickle-me>\r
+MIME-Version: 1.0\r
+Content-Type: text/plain; charset=us-ascii\r
+X-BeenThere: notmuch@notmuchmail.org\r
+X-Mailman-Version: 2.1.13\r
+Precedence: list\r
+List-Id: "Use and development of the notmuch mail system."\r
+       <notmuch.notmuchmail.org>\r
+List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
+List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
+List-Post: <mailto:notmuch@notmuchmail.org>\r
+List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
+List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
+X-List-Received-Date: Sat, 16 Apr 2011 13:07:09 -0000\r
+\r
+On Tue, 27 Jul 2010 09:48:44 +0800, Kan-Ru Chen <kanru@kanru.info> wrote:\r
+> widget-end-of-line checks eolp to decide whether C-e in a fixed size\r
+> field should go to the end of the text in the field or the end of\r
+> the field itself. So put a trailing white space to pad the search\r
+> field.\r
+> \r
+> Previous behavior:\r
+> \r
+>  Search: [text                _]\r
+> \r
+> Now:\r
+> \r
+>  Search: [text_                ]\r
+> ---\r
+>  emacs/notmuch-hello.el |    4 ++--\r
+>  1 files changed, 2 insertions(+), 2 deletions(-)\r
+> \r
+> diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el\r
+> index f8ae332..6ef03bb 100644\r
+> --- a/emacs/notmuch-hello.el\r
+> +++ b/emacs/notmuch-hello.el\r
+> @@ -416,10 +416,10 @@ Complete list of currently available key bindings:\r
+>                     ;; Leave some space at the start and end of the\r
+>                     ;; search boxes.\r
+>                     :size (max 8 (- (window-width) notmuch-hello-indent\r
+> -                                   (length "Search: ")))\r
+> +                                   (length "Search: ") 1 ))\r
+>                     :action (lambda (widget &rest ignore)\r
+>                               (notmuch-hello-search (widget-value widget))))\r
+> -    (widget-insert "\n")\r
+> +    (widget-insert " \n")\r
+>  \r
+>      (when notmuch-hello-recent-searches\r
+>        (widget-insert "\nRecent searches: ")\r
+> -- \r
+> 1.7.1\r
+> \r
+> \r
+\r
+\r
++1\r
+\r
+Can't imagine how this has been collecting dust for so long.\r
+\r
+Very useful, very concise, and still applies cleanly to HEAD.\r
+\r
+Peace\r
+\r
+-Pieter\r