[PATCH] emacs/show: force notmuch-show-buttonise-links to act on lines
Tomi Ollila
tomi.ollila at iki.fi
Mon Oct 10 11:30:21 PDT 2016
On Mon, Oct 10 2016, David Bremner <david at tethera.net> wrote:
> This seems to fix a problem with emacs 25 creating partial buttons by
> calling n-s-b-l with a region that does not include the whole button.
> I'm not 100% sure it's legit to act outside the region passed by
> jit-lock, but goto-address-fontify-region (where I borrowed the code
> from) already does this, so this patch to not make things worse.
> ---
Applies cleanly and fixes the test in question on fedora 24
> emacs/notmuch-show.el | 12 +++++++-----
> 1 file changed, 7 insertions(+), 5 deletions(-)
>
> This makes the test suite pass with emacs 25 for me. If people think
> this is sane, I'd like to do a bug fix release with this change.
>
> diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
> index f2487ab..643dee6 100644
> --- a/emacs/notmuch-show.el
> +++ b/emacs/notmuch-show.el
> @@ -1174,13 +1174,15 @@ This also turns id:\"<message id>\"-parts and mid: links into
> buttons for a corresponding notmuch search."
> (goto-address-fontify-region start end)
> (save-excursion
> - (let (links)
> - (goto-char start)
> - (while (re-search-forward notmuch-id-regexp end t)
> + (let (links
> + (beg-line (progn (goto-char start) (line-beginning-position)))
> + (end-line (progn (goto-char end) (line-end-position))))
> + (goto-char beg-line)
> + (while (re-search-forward notmuch-id-regexp end-line t)
> (push (list (match-beginning 0) (match-end 0)
> (match-string-no-properties 0)) links))
> - (goto-char start)
> - (while (re-search-forward notmuch-mid-regexp end t)
> + (goto-char beg-line)
> + (while (re-search-forward notmuch-mid-regexp end-line t)
> (let* ((mid-cid (match-string-no-properties 1))
> (mid (save-match-data
> (string-match "^[^/]*" mid-cid)
> --
> 2.9.3
>
> _______________________________________________
> notmuch mailing list
> notmuch at notmuchmail.org
> https://notmuchmail.org/mailman/listinfo/notmuch
More information about the notmuch
mailing list