fix(cli): prevent oversized error data spam
A backtrace with a sufficiently large object (especially with circular references) could unhelpfully flood the screen.
This commit is contained in:
parent
2660fcce25
commit
2aca862187
1 changed files with 5 additions and 1 deletions
|
@ -935,7 +935,11 @@ considered as well."
|
|||
(error-message-string data)
|
||||
(get (car data) 'error-message)))
|
||||
(unless generic?
|
||||
(print! "%s %S" (bold "Details:") (cdr data)))
|
||||
(print! "%s %s" (bold "Details:")
|
||||
(let* ((print-level 3)
|
||||
(print-circle t)
|
||||
(print-escape-newlines t))
|
||||
(prin1-to-string (cdr data)))))
|
||||
(when backtrace
|
||||
(print! (bold "Backtrace:"))
|
||||
(print-group!
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue