diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-15 22:07:09 -0200 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-15 22:07:09 -0200 |
| commit | 1dfa97db27a72f0121001b1d85c13d1cdee37f31 (patch) | |
| tree | 5ba3747e391613249c73fa9bf00daa96ab65b75c /sx-question-print.el | |
| parent | feb8082bac11154d4f6cc768add49bd9b7c0c107 (diff) | |
sx-question-mode--insert-header accepts a nil face as third arg
Diffstat (limited to 'sx-question-print.el')
| -rw-r--r-- | sx-question-print.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/sx-question-print.el b/sx-question-print.el index b258fde..0ae0f04 100644 --- a/sx-question-print.el +++ b/sx-question-print.el @@ -299,7 +299,10 @@ where `value' is given `face' as its face. (while args (insert (propertize (pop args) 'face 'sx-question-mode-header) - (propertize (pop args) 'face (pop args))))) + (let ((header (pop args)) + (face (pop args))) + (if face (propertize header 'face face) + header))))) ;;;; Printing and Font-locking the content (body) |