diff --git a/src/server/picture_processor/server.cljs b/src/server/picture_processor/server.cljs index f3f455c..6fcbbda 100644 --- a/src/server/picture_processor/server.cljs +++ b/src/server/picture_processor/server.cljs @@ -1,6 +1,9 @@ (ns picture-processor.server) +; js requires (def express (js/require "express")) + +; the currently running server (def server (atom nil)) (defn- root-response @@ -11,18 +14,16 @@ "Start the app server" [port] (let [app (express)] + ; build the routing tree (.get app "/" root-response) - (let [-server (.listen app port #(.log js/console (str "Server listening on port " port)))] - (reset! server -server) - (.log js/console @server) - ))) + (let [-server (.listen app + port + #(.log js/console (str "Server listening on port " + port)))] + (reset! server -server)))) (defn stop "Stop the app server" [] (.close @server) (reset! server nil)) - -(start 3000) -(stop) -(.log js/console @server)