From 403d7dce6c987add294c69fd5f52b2bd9e3c4cc2 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 3 Feb 2017 08:06:26 -0500 Subject: [PATCH] Add core/autoload/message.el; rudimentary doom message buffer library --- core/autoload/message.el | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 core/autoload/message.el diff --git a/core/autoload/message.el b/core/autoload/message.el new file mode 100644 index 000000000..34a5f5c70 --- /dev/null +++ b/core/autoload/message.el @@ -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))))) +