[add] specifically handling dexador's http errors on client

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)))))