Factor out a heading face

1 files changed, 5 insertions, 1 deletions

diff --git a/helpful.el b/helpful.el
index 2eef9d9..b27e75c 100644
--- 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."