Switch to aleph

next
Marcin Kulik 8 years ago
parent af35483f2d
commit ffefc44f41

@ -11,6 +11,7 @@
[ring/ring-defaults "0.2.1"]
[ring-jetty-component "0.3.1"]
[ring-webjars "0.1.1"]
[aleph "0.4.1"]
[org.slf4j/slf4j-nop "1.7.21"]
[org.webjars/normalize.css "3.0.2"]
[duct/hikaricp-component "0.1.0"]

@ -1,6 +1,6 @@
{:components
{:app #var duct.component.handler/handler-component
:http #var ring.component.jetty/jetty-server
:http #var asciinema.component.aleph/aleph-server
:db #var duct.component.hikaricp/hikaricp
:ragtime #var duct.component.ragtime/ragtime}
:endpoints

@ -0,0 +1,17 @@
(ns asciinema.component.aleph
(:require [com.stuartsierra.component :as component]
[aleph.http :refer [start-server]]))
(defrecord WebServer [port server app]
component/Lifecycle
(start [component]
(let [handler (:handler app)
server (start-server handler {:port port :join? false})]
(assoc component :server server)))
(stop [component]
(when server
(.close server)
component)))
(defn aleph-server [{:keys [port app]}]
(map->WebServer {:port port :app app}))
Loading…
Cancel
Save