refactor(lib): move doom-log to doom-lib

This is such an essential macro that it should be universally available,
and not stowed away in the print library.
This commit is contained in:
Henrik Lissner 2022-09-06 23:46:42 +02:00
parent 3ae8c520d5
commit 0a51fdff53
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
2 changed files with 18 additions and 34 deletions

View file

@ -1,6 +1,22 @@
;;; doom-lib.el -*- lexical-binding: t; -*-
;;; doom-lib.el --- Doom's core standard library -*- lexical-binding: t; -*-
;;; Commentary:
;;; Code:
(require 'cl-lib)
(defmacro doom-log (output &rest args)
"Log a message in *Messages*.
Does not emit the message in the echo area. This is a macro instead of a
function to prevent the potentially expensive execution of its arguments when
debug mode is off."
(declare (debug t))
`(when (or init-file-debug noninteractive)
(let ((inhibit-message (not init-file-debug)))
(message
"%s" (propertize
(format (concat "* [%.06f] " ,output)
(float-time (time-subtract (current-time) before-init-time))
,@args)
'face 'font-lock-doc-face)))))
;;