diff options
| -rw-r--r-- | lib/state.lisp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/state.lisp b/lib/state.lisp index 5ca5a7b..49cd5d8 100644 --- a/lib/state.lisp +++ b/lib/state.lisp @@ -179,5 +179,9 @@ sets the api's *host* variable. If BODY produces no errors, the " (write-drafts-to-disk) (write-cache-to-disk) (write-config-to-disk)) + (dexador.error:http-request-failed (e) + (format *error-output* "Operation failed. The server at ~a returned with ~a~%" + api:*host* + (dexador.error:response-status e))) (error (e) (format *error-output* "~a~%" e))))) |