function | removed v0.0-1503 | added v0.0-927 | Edit |
(start-server opts)
Start the server on the specified port.
(defn start-server
[opts]
(let [ss (ServerSocket. (:port opts))]
(future (server-loop opts ss))
(swap! server-state (fn [old] (assoc old :socket ss :port (:port opts))))))