emacs: Make the message-summary highlighting extend to end of visible line.
authorCarl Worth <cworth@cworth.org>
Thu, 3 Dec 2009 17:48:00 +0000 (09:48 -0800)
committerCarl Worth <cworth@cworth.org>
Thu, 3 Dec 2009 19:29:35 +0000 (11:29 -0800)
This will look much nicer than the highlighting terminating at the
end of the summary text.

notmuch.el

index 744f4d3c1141108699e5374248649d3c88ec7539..29bb9eb27342aaaf77b627e3bea562682b2d5ba8 100644 (file)
@@ -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)))