doom-log: show source module before message

This commit is contained in:
Henrik Lissner 2019-05-15 15:16:15 -04:00
parent 962f6a1032
commit c6ceb147e6
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -108,13 +108,13 @@ Accepts the same arguments as `message'."
(let ((inhibit-message (active-minibuffer-window))) (let ((inhibit-message (active-minibuffer-window)))
(message (message
,(concat (propertize "DOOM " 'face 'font-lock-comment-face) ,(concat (propertize "DOOM " 'face 'font-lock-comment-face)
format-string
(when doom--current-module (when doom--current-module
(propertize (propertize
(format " [%s/%s]" (format "[%s/%s] "
(doom-keyword-name (car doom--current-module)) (doom-keyword-name (car doom--current-module))
(cdr doom--current-module)) (cdr doom--current-module))
'face 'warning))) 'face 'warning))
format-string)
,@args)))) ,@args))))
(defun FILE! () (defun FILE! ()