mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-03 12:27:26 -05:00
Add core/autoload/message.el; rudimentary doom message buffer library
This commit is contained in:
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)))))
|
||||||
|
|
Reference in New Issue
Block a user