From 8e126fe1fb188ecc85ff53134bd9afd3d394b041 Mon Sep 17 00:00:00 2001 From: Alexander Botero-Lowry Date: Thu, 3 Dec 2009 10:52:58 -0800 Subject: [PATCH] Since we know what these buttons do it seems like the underlines are unnecessary. --- notmuch.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/notmuch.el b/notmuch.el index b3f67d2b..54b4ba86 100644 --- a/notmuch.el +++ b/notmuch.el @@ -574,14 +574,19 @@ which this thread was originally shown." (force-window-update) (redisplay t)) -(define-button-type 'notmuch-button-invisibility-toggle-type 'action 'notmuch-toggle-invisible-action 'follow-link t) +(define-button-type 'notmuch-button-invisibility-toggle-type + 'action 'notmuch-toggle-invisible-action + 'follow-link t + 'face "default") (define-button-type 'notmuch-button-citation-toggle-type 'help-echo "mouse-1, RET: Show citation" :supertype 'notmuch-button-invisibility-toggle-type) (define-button-type 'notmuch-button-signature-toggle-type 'help-echo "mouse-1, RET: Show signature" :supertype 'notmuch-button-invisibility-toggle-type) (define-button-type 'notmuch-button-headers-toggle-type 'help-echo "mouse-1, RET: Show headers" :supertype 'notmuch-button-invisibility-toggle-type) -(define-button-type 'notmuch-button-body-toggle-type 'help-echo "mouse-1, RET: Show message" +(define-button-type 'notmuch-button-body-toggle-type + 'help-echo "mouse-1, RET: Show message" + 'face 'notmuch-message-summary-face :supertype 'notmuch-button-invisibility-toggle-type) (defun notmuch-show-markup-citations-region (beg end depth) @@ -737,7 +742,6 @@ which this thread was originally shown." (let ((end (point-marker))) (indent-rigidly beg end depth) (goto-char beg) - (overlay-put (make-overlay (line-beginning-position) summary-end) 'face 'notmuch-message-summary-face) (setq btn (make-button (line-beginning-position) summary-end :type 'notmuch-button-body-toggle-type)) (forward-line) (add-to-invisibility-spec invis-spec) -- 2.26.2