From: "Aneesh Kumar K. V" <aneesh.kumar@linux.vnet.ibm.com>
To: Kan-Ru Chen <kanru@kanru.info>, notmuch@notmuchmail.org
In-Reply-To: <1259592639-15593-1-git-send-email-kanru@kanru.info>
References: <1259592639-15593-1-git-send-email-kanru@kanru.info>
Date: Mon, 30 Nov 2009 22:10:59 +0530
Message-ID: <877ht8rmn8.fsf@linux.vnet.ibm.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Subject: Re: [notmuch] [PATCH] notmuch.el: Add face support to message
 summary	and subject lines.
Precedence: list

On Mon, 30 Nov 2009 22:50:39 +0800, Kan-Ru Chen <kanru@kanru.info> wrote:
> Remove the underline of both message summary and subject lines.
> Message summary still defaults to reverse-video, use customize to
> change it to whatever you like.
> 
> Signed-off-by: Kan-Ru Chen <kanru@kanru.info>
> ---
>  notmuch.el |   20 ++++++++++++++++----
>  1 files changed, 16 insertions(+), 4 deletions(-)
> 
> diff --git a/notmuch.el b/notmuch.el
> index 65473ba..730538c 100644
> --- a/notmuch.el
> +++ b/notmuch.el
> @@ -714,9 +714,8 @@ which this thread was originally shown."
>    (let ((beg (point-marker))
>          (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))
> +    (setq btn (make-button beg (point) :type 'notmuch-button-body-toggle-type
> +                           'face 'notmuch-show-message-summary-face))
>      (forward-line 1)
>      (end-of-line)
>      (let ((beg-hidden (point-marker)))
> @@ -739,7 +738,8 @@ which this thread was originally shown."
>            (forward-line)
>            (make-button (line-beginning-position) (line-end-position)
>                          'invisibility-spec (cons invis-spec t)
> -                        :type 'notmuch-button-headers-toggle-type))
> +                        :type 'notmuch-button-headers-toggle-type
> +                        'face 'notmuch-show-message-headers-face))
>          (goto-char end)
>          (insert "\n")
>  	(set-marker beg nil)
> @@ -959,6 +959,18 @@ thread from that buffer can be show when done with this one)."
>    "Notmuch search mode face used to highligh tags."
>    :group 'notmuch)
> 
> +(defface notmuch-show-message-summary-face
> +  '((default
> +    (:bold t :inverse-video t)))
> +  "Notmuch show mode face used to highlight summary line."
> +  :group 'notmuch)
> +
> +(defface notmuch-show-message-headers-face
> +  '((default
> +     (:bold t)))
> +  "Notmuch show mode face used to highlight header lines."
> +  :group 'notmuch)
> +
>  (defvar notmuch-tag-face-alist nil
>    "List containing the tag list that need to be highlighed")
> 

The subject line is already have a font face value attached.
message-header-name to show the name of the header and
message-header-subject to show the subject details.

-aneesh