From: Jani Nikula <jani@nikula.org>
To: Pieter Praet <pieter@praet.org>,
	Dmitry Kurochkin <dmitry.kurochkin@gmail.com>, notmuch@notmuchmail.org
Subject: Re: [PATCH 1/3] emacs: bind "s" to `notmuch-search' in notmuch-hello
	buffer
In-Reply-To: <87zkdavakj.fsf@praet.org>
References: <1326828850-8519-1-git-send-email-dmitry.kurochkin@gmail.com>
	<874nvukort.fsf@nikula.org> <87zkdavakj.fsf@praet.org>
User-Agent: Notmuch/0.10.2+187~g43d4f26 (http://notmuchmail.org) Emacs/23.1.1
	(i686-pc-linux-gnu)
Date: Thu, 26 Jan 2012 14:13:40 +0000
Message-ID: <87k44eimaz.fsf@nikula.org>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Precedence: list

On Thu, 26 Jan 2012 14:48:44 +0100, Pieter Praet <pieter@praet.org> wrote:
> On Tue, 17 Jan 2012 23:22:30 +0200, Jani Nikula <jani@nikula.org> wrote:
> > [...]
> > 
> > After this, what would the user have to do to bind some key to put the
> > point in the search box? If someone wants to restore old behaviour for
> > themselves.
> > 
> 
> This should work:
> 
>   #+begin_src emacs-lisp
>     (add-hook 'notmuch-hello-mode-hook
>               (lambda ()
>                  (local-set-key (kbd "s")
>                   (lambda() (interactive)
>                    (re-search-forward "Search: ")))))
>   #+end_src

Thanks for the basic idea, iterated into:

(define-key notmuch-hello-mode-map "S"
  (lambda() (interactive)
    (goto-char (point-min))
    (re-search-forward "Search: ")))


BR,
Jani.