not sure about this workflow or anything

Flexiana · Jan 12, 2024 · 46a3d66 · 46a3d66
1 parent 0dc833b
commit 46a3d66
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/xiana/webserver.clj b/src/xiana/webserver.clj
@@ -13,15 +13,16 @@
   AutoCloseable
   (close [this]
     (log/info "Stop webserver" (:options this))
-    (server/stop-server (:server this))))
+    ((:server this) :timeout 100)))
 
 (defn- make
   "Web server instance."
   [dependencies]
-  (let [options (:webserver dependencies (:xiana/web-server dependencies))]
+  (let [options (:webserver dependencies (:xiana/web-server dependencies))
+        server (server/run-server (handler-fn dependencies) options)]
     (map->webserver
       {:options options
-       :server  (server/run-server (handler-fn dependencies) options)})))
+       :server server})))
 
 (defn start
   "Start web server."