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