Make print! et co always respect standard-output

This commit is contained in:
Henrik Lissner 2019-12-16 16:49:34 -05:00
parent 3b2a37d9a1
commit 6f7bdc801a
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -106,9 +106,8 @@ Accepts 'ansi and 'text-properties. nil means don't render colors.")
;;;###autoload ;;;###autoload
(defun doom--format-print (output) (defun doom--format-print (output)
(unless (string-empty-p output) (unless (string-empty-p output)
(if (not noninteractive) (princ output)
(message "%s" output) (when (or noninteractive (not (eq standard-output t)))
(princ output)
(terpri)) ; newline (terpri)) ; newline
t)) t))