emacs: Highlight message-summary with background-color instead of inverse video.
authorCarl Worth <cworth@cworth.org>
Thu, 3 Dec 2009 17:52:43 +0000 (09:52 -0800)
committerCarl Worth <cworth@cworth.org>
Thu, 3 Dec 2009 19:29:35 +0000 (11:29 -0800)
Also, do this with a notmuch-message-summary-face variable so that
the user can easily customize the desried effect.

notmuch.el

index 29bb9eb27342aaaf77b627e3bea562682b2d5ba8..f3adfcf5cb1ed2a7c67e5dd6a9b02e8c493e1272 100644 (file)
@@ -728,8 +728,7 @@ which this thread was originally shown."
   (let ((beg (point-marker))
        (summary-end (copy-marker (line-beginning-position 2)))
         (btn nil))
-    ; Inverse video for subject
-    (overlay-put (make-overlay beg summary-end) 'face '(:inverse-video t))
+    (overlay-put (make-overlay beg summary-end) 'face 'notmuch-message-summary-face)
     (setq btn (make-button beg summary-end :type 'notmuch-button-body-toggle-type))
     (forward-line 1)
     (end-of-line)
@@ -1046,6 +1045,12 @@ thread from that buffer can be show when done with this one)."
   (interactive)
   (goto-char (point-min)))
 
+(defface notmuch-message-summary-face
+ '((((class color) (background light)) (:background "#f0f0f0"))
+   (((class color) (background dark)) (:background "#303030")))
+ "Face for the single-line message summary in notmuch-show-mode."
+ :group 'notmuch)
+
 (defface notmuch-tag-face
   '((((class color)
       (background dark))