awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

doom-log: show source module before message

Browse Source
This commit is contained in:
Henrik Lissner
2019-05-15 15:16:15 -04:00
parent 962f6a1032
commit c6ceb147e6
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
core/core-lib.el
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! ()