From: Carl Worth <cworth@cworth.org>
Date: Thu, 3 Dec 2009 17:48:00 +0000 (-0800)
Subject: emacs: Make the message-summary highlighting extend to end of visible line.
X-Git-Tag: 0.1~242
X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=682102c2df45bb6642f2d5c538284fe48136d4ea

emacs: Make the message-summary highlighting extend to end of visible line.

This will look much nicer than the highlighting terminating at the
end of the summary text.
---

diff --git a/notmuch.el b/notmuch.el
index 744f4d3c..29bb9eb2 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -726,11 +726,11 @@ which this thread was originally shown."
   (re-search-forward notmuch-show-header-begin-regexp)
   (forward-line)
   (let ((beg (point-marker))
+	(summary-end (copy-marker (line-beginning-position 2)))
         (btn nil))
-    (end-of-line)
     ; Inverse video for subject
-    (overlay-put (make-overlay beg (point)) 'face '(:inverse-video t))
-    (setq btn (make-button beg (point) :type 'notmuch-button-body-toggle-type))
+    (overlay-put (make-overlay beg summary-end) 'face '(:inverse-video t))
+    (setq btn (make-button beg summary-end :type 'notmuch-button-body-toggle-type))
     (forward-line 1)
     (end-of-line)
     (let ((beg-hidden (point-marker)))