]> git.notmuchmail.org Git - notmuch/commitdiff
merge buttonise-links patch to master
authorDavid Bremner <david@tethera.net>
Wed, 12 Oct 2016 01:42:26 +0000 (22:42 -0300)
committerDavid Bremner <david@tethera.net>
Wed, 12 Oct 2016 01:42:26 +0000 (22:42 -0300)
emacs/notmuch-show.el

index f2487abf5ccf983eae438c01cc06e388dc1fa693..643dee6ecb928b393bf1c821aca90e0ad36b3811 100644 (file)
@@ -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)