emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Rename doom-format lib -> doom-output

Browse source 
`format` isn't an appropriate for this library, considering it (and
future additions to it) will be mainly concerned with printing or
capturing output.
This commit is contained in:
Henrik Lissner 2020-05-25 03:32:50 -04:00
parent a706c3527b
commit be889d09e8
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
4 changed files with 64 additions and 57 deletions
Download patch file Download diff file Expand all files Collapse all files

12
core/core-cli.el
View file

@ -5,7 +5,7 @@
(load! "autoload/process")
(load! "autoload/plist")
(load! "autoload/files")
(load! "autoload/format")
(load! "autoload/output")
;; Create all our core directories to quell file errors
(mapc (doom-rpartial #'make-directory 'parents)
@ -311,7 +311,7 @@ original state.")
(terpri)
(let* ((options
(cons (lambda ()
(let ((doom-format-indent 0))
(let ((doom-output-indent 0))
(terpri)
(print! (warn "Aborted")))
(kill-emacs 1))
@ -329,7 +329,7 @@ original state.")
(funcall (nth answer options)))))))))
(defadvice! doom--straight-respect-print-indent-a (args)
"Indent straight progress messages to respect `doom-format-indent', so we
"Indent straight progress messages to respect `doom-output-indent', so we
don't have to pass whitespace to `straight-use-package's fourth argument
everywhere we use it (and internally)."
:filter-args #'straight-use-package
@ -338,9 +338,9 @@ everywhere we use it (and internally)."
args
(list melpa-style-recipe no-clone no-build
(if (and (not cause)
(boundp 'doom-format-indent)
(> doom-format-indent 0))
(make-string (1- (or doom-format-indent 1)) 32)
(boundp 'doom-output-indent)
(> doom-output-indent 0))
(make-string (1- (or doom-output-indent 1)) 32)
cause)
interactive)))