From: Carl Worth 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: http://git.tremily.us/?a=commitdiff_plain;h=682102c2df45bb6642f2d5c538284fe48136d4ea;p=notmuch.git 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)))