Add core/autoload/message.el; rudimentary doom message buffer library
This commit is contained in:
parent
29943fefa6
commit
403d7dce6c
1 changed files with 15 additions and 0 deletions
15
core/autoload/message.el
Normal file
15
core/autoload/message.el
Normal file
|
@ -0,0 +1,15 @@
|
|||
;;; message.el
|
||||
|
||||
;;;###autoload
|
||||
(defun doom-message-buffer ()
|
||||
(let ((buffer (get-buffer-create " *doom-messages*")))
|
||||
(unless (get-buffer-window-list buffer)
|
||||
(doom-popup-buffer buffer))))
|
||||
|
||||
;;;###autoload
|
||||
(defun doom-message (format &rest args)
|
||||
(if noninteractive
|
||||
(apply 'message format args)
|
||||
(with-current-buffer (doom-message-buffer)
|
||||
(insert (format format args)))))
|
||||
|
Loading…
Add table
Add a link
Reference in a new issue