Dump *straight-process* buffer after straight errors

This commit is contained in:
Henrik Lissner 2020-01-08 22:07:03 -05:00
parent dc22815227
commit 4bd59f5ed9
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -99,7 +99,11 @@ with a different private module."
(if (cdr e)
(dolist (item (cdr e))
(print! "%S" item))
(print! "n/a"))))
(print! "n/a")))
(when (string-match-p (regexp-quote straight-process-buffer)
(error-message-string e))
(print! (bold "Straight output:"))
(print-group! (print! "%s" (straight--process-get-output)))))
(unless debug-on-error
(terpri)
(print!