branch: elpa/racket-mode
commit 8a80578405cb1dcce460fd34c23daed4c5f0546b
Author: Greg Hendershott <g...@greghendershott.com>
Commit: Greg Hendershott <g...@greghendershott.com>
Fix fontification in racket-logger-mode
Commit 1ec8ac5 broke fontification unless the user manually disables
font-lock-mode in this buffer -- which I must have accidentally done
in the process of working on that commit. :(
However by default font-lock-mode will be on for most users.
The right thing to do: Instead of using the 'face property, use the
'font-lock-face property.
---
racket-logger.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/racket-logger.el b/racket-logger.el
index 5814c4431c..7bfebd8998 100644
--- a/racket-logger.el
+++ b/racket-logger.el
@@ -86,11 +86,11 @@ As a result, we might create this buffer before the user
does a
(point-was-at-end-p (equal original-point (point-max))))
(goto-char (point-max))
(insert (propertize level-str
- 'face level-face
+ 'font-lock-face level-face
'racket-logger-item-level t)
" "
(propertize (symbol-name topic)
- 'face racket-logger-topic-face)
+ 'font-lock-face racket-logger-topic-face)
": "
message
"\n")
@@ -106,7 +106,7 @@ As a result, we might create this buffer before the user
does a
(goto-char (point-max))
(insert (propertize (concat "racket-logger-config:\n"
(pp-to-string racket-logger-config))
- 'face racket-logger-config-face))
+ 'font-lock-face racket-logger-config-face))
(goto-char (point-max)))))
(defun racket--logger-set (topic level)
