moved host assertion inside handler-case

1 files changed, 2 insertions, 2 deletions

diff --git a/lib/state.lisp b/lib/state.lisp
index 7a9a427..5ca5a7b 100644
--- a/lib/state.lisp
+++ b/lib/state.lisp
@@ -170,10 +170,10 @@ sets the api's *host* variable. If BODY produces no errors, the "
           (*cache* (read-cache-file))
           (*drafts* (read-drafts-file))
           (api:*host* (config-host *config*)))
-     (assert api:*host* () "ol must be configured with a server host.")
-     (set-term-width)
      (handler-case
          (progn
+           (assert api:*host* () "ol must be configured with a server host.")
+           (set-term-width)
            ,@body
            ;; only if there is no error do we save the local state.
            (write-drafts-to-disk)