helpful

a fork of Wilfred's helpful
git clone https://git.trogloxene.org/helpful.git
Log | Files | Refs | README
commit 4ab9da8f434b0d0c17e80e29f7d56e02ae43f8bd
parent fe8b552570cf685e27f35d8076b1d737437d97bc
Author: Wilfred Hughes <me@wilfred.me.uk>
Date:   Sun, 31 Dec 2017 00:25:00 +0000

Factor out a heading face

Diffstat:

Mhelpful.el | 6+++++-


1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/helpful.el b/helpful.el
@@ -119,9 +119,13 @@ To disable cleanup entirely, set this variable to nil. See also
         (kill-buffer (ring-remove helpful--buffers))))
     buf))
 
+(defface helpful-heading
+  '((t (:weight bold)))
+  "Face used for headings in Helpful buffers.")
+
 (defun helpful--heading (text)
   "Propertize TEXT as a heading."
-  (format "%s\n" (propertize text 'face 'bold)))
+  (format "%s\n" (propertize text 'face 'helpful-heading)))
 
 (defun helpful--format-closure (sym form)
   "Given a closure, return an equivalent defun form."