Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defproject test "0.1.0-SNAPSHOT"
- :dependencies [[org.clojure/clojure "1.7.0"]
- [org.clojure/clojurescript "1.7.170"]
- [org.clojure/core.async "0.2.374"]
- [jayq "2.5.4"]
- [http-kit "2.1.18"]
- [com.taoensso/sente "1.7.0"]
- [compojure "1.4.0"]]
- :plugins [[lein-cljsbuild "1.1.1"]
- [lein-figwheel "0.5.0-1"]]
- :clean-targets ^{:protect false} ["resources/public/js/compiled" "target"]
- :profiles {:dev {:dependencies [[com.cemerick/piggieback "0.2.1"]
- [figwheel-sidecar "0.5.0-1"]]
- :injections [(use 'figwheel-sidecar.repl-api)
- (start-figwheel!)]
- :repl-options {:nrepl-middleware [cemerick.piggieback/wrap-cljs-repl]}
- :source-paths ["src/clj" "src/cljs"]}}
- :cljsbuild {:builds
- [{:id "dev"
- :source-paths ["src/clj" "src/cljs"]
- :figwheel {
- :on-jsload "test.game/on-js-reload"
- :css-dirs ["resources/public/css"]
- :ring-handler test.server/handler
- }
- :compiler {:warnings true
- :asset-path "js/compiled/out"
- :output-to "resources/public/js/compiled/test.js"
- :output-dir "resources/public/js/compiled/out"
- :source-map-timestamp true}}]})
- ;; server.clj
- (ns test.server
- (:require
- [taoensso.sente :as sente]
- [taoensso.sente.server-adapters.http-kit :refer (sente-web-server-adapter)]
- [ring.middleware.params]
- [ring.middleware.keyword-params]
- [compojure.core :refer [defroutes GET POST]]
- ))
- (let [{:keys [ch-recv send-fn ajax-post-fn ajax-get-or-ws-handshake-fn
- connected-uids]}
- (sente/make-channel-socket! sente-web-server-adapter {})]
- (def ring-ajax-post ajax-post-fn)
- (def ring-ajax-get-or-ws-handshake ajax-get-or-ws-handshake-fn)
- (def ch-chk ch-recv)
- (def chsk-send! send-fn)
- (def connected-uids connected-uids))
- (defroutes routes
- (GET "/test" [] "<h1>Hello World</h1>")
- (GET "/chsk" req (ring-ajax-get-or-ws-handshake req))
- (POST "/chsk" req (ring-ajax-post req)))
- (def handler
- (-> routes
- ring.middleware.keyword-params/wrap-keyword-params
- ring.middleware.params/wrap-params))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement