From 4ab9da8f434b0d0c17e80e29f7d56e02ae43f8bd Mon Sep 17 00:00:00 2001 From: Wilfred Hughes Date: Sun, 31 Dec 2017 00:25:00 +0000 Subject: Factor out a heading face --- helpful.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) 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." -- cgit v1.0