awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-27 14:23:43 -05:00
Code Issues Packages Projects Releases Wiki Activity

autoload/message: doom--ansi-apply => doom-ansi-apply + autoload

Browse Source
This commit is contained in:
Henrik Lissner
2017-04-15 01:22:29 -04:00
parent 87e386fceb
commit e32a804f1d
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
core/autoload/message.el
View File

@@ -44,9 +44,9 @@ interactive session."
(lambda (ansi) (lambda (ansi)
`(,(car ansi) `(,(car ansi)
(lambda (message &rest args) (lambda (message &rest args)
(apply 'doom--ansi-apply ,(cdr ansi) message args)))) (apply 'doom-ansi-apply ,(cdr ansi) message args))))
(append doom-ansi-fg doom-ansi-bg doom-ansi-fx)) (append doom-ansi-fg doom-ansi-bg doom-ansi-fx))
(color (symbol-function 'doom--ansi-apply))) (color (symbol-function 'doom-ansi-apply)))
(format ,message ,@args))) (format ,message ,@args)))
;;;###autoload ;;;###autoload
@@ -55,7 +55,8 @@ interactive session."
interactive session." interactive session."
`(message (ansi-format! ,message ,@args))) `(message (ansi-format! ,message ,@args)))
(defun doom--ansi-apply (code format &rest args) ;;;###autoload
(defun doom-ansi-apply (code format &rest args)
(if noninteractive (if noninteractive
(format "\e[%dm%s\e[%sm" (format "\e[%dm%s\e[%sm"
(if (numberp code) (if (numberp code)