[PATCH v2] emacs: add invisible dot instead of space at the end of notmuch-hello search box
Pieter Praet
pieter at praet.org
Wed Jan 18 05:49:27 PST 2012
On Tue, 17 Jan 2012 19:55:34 +0400, Dmitry Kurochkin <dmitry.kurochkin at gmail.com> wrote:
> This makes `show-trailing-whitespace' happy, i.e. it does not mark the
> whole search box line as trailing spaces.
>
> Since the dot is invisible, this change makes no visible difference
> for `notmuch-hello'.
> ---
> emacs/notmuch-hello.el | 9 ++++++---
> 1 files changed, 6 insertions(+), 3 deletions(-)
>
> diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el
> index 02017ce..38846ef 100644
> --- a/emacs/notmuch-hello.el
> +++ b/emacs/notmuch-hello.el
> @@ -508,9 +508,12 @@ Complete list of currently available key bindings:
> (length "Search: ")))
> :action (lambda (widget &rest ignore)
> (notmuch-hello-search (widget-value widget))))
> - ;; add an invisible space to make `widget-end-of-line' ignore
> - ;; trailine spaces in the search widget field
> - (widget-insert " ")
> + ;; Add an invisible dot to make `widget-end-of-line' ignore
> + ;; trailing spaces in the search widget field. A dot is used
> + ;; instead of a space to make `show-trailing-whitespace'
> + ;; happy, i.e. avoid it marking the whole line as trailing
> + ;; spaces.
> + (widget-insert ".")
> (put-text-property (1- (point)) (point) 'invisible t)
> (widget-insert "\n")
>
> --
> 1.7.8.3
>
> _______________________________________________
> notmuch mailing list
> notmuch at notmuchmail.org
> http://notmuchmail.org/mailman/listinfo/notmuch
+1
Peace
--
Pieter
More information about the notmuch
mailing list