diff --git a/core/core-cli-lib.el b/core/core-cli-lib.el index b389e8346..eda5acbad 100644 --- a/core/core-cli-lib.el +++ b/core/core-cli-lib.el @@ -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!