From 66c6363365f1a8e7fb51bfb925cbb5949a0ae498 Mon Sep 17 00:00:00 2001 From: Valtteri Harmainen Date: Sat, 20 Apr 2019 19:58:59 +0300 Subject: [PATCH] Add backend handler to re-frame example To enable running example with :use-fragment false --- examples/frontend-re-frame/project.clj | 6 +++++- examples/frontend-re-frame/src/clj/backend/server.clj | 11 +++++++++++ 2 files changed, 16 insertions(+), 1 deletion(-) create mode 100644 examples/frontend-re-frame/src/clj/backend/server.clj diff --git a/examples/frontend-re-frame/project.clj b/examples/frontend-re-frame/project.clj index 41645e53..b487ce7c 100644 --- a/examples/frontend-re-frame/project.clj +++ b/examples/frontend-re-frame/project.clj @@ -13,7 +13,11 @@ :min-lein-version "2.5.3" :source-paths ["src/clj" "src/cljs"] :clean-targets ^{:protect false} ["resources/public/js/compiled" "target"] - :figwheel {:css-dirs ["resources/public/css"]} + :figwheel + {:css-dirs ["resources/public/css"] + :server-port 3449 + :nrepl-port 7002 + :ring-handler backend.server/handler} :profiles {:dev diff --git a/examples/frontend-re-frame/src/clj/backend/server.clj b/examples/frontend-re-frame/src/clj/backend/server.clj new file mode 100644 index 00000000..88171cfa --- /dev/null +++ b/examples/frontend-re-frame/src/clj/backend/server.clj @@ -0,0 +1,11 @@ +(ns backend.server + (:require [clojure.java.io :as io] + [ring.util.response :as resp] + [ring.middleware.content-type :as content-type])) + +(def handler + (-> (fn [request] + (or (resp/resource-response (:uri request) {:root "public"}) + (-> (resp/resource-response "index.html" {:root "public"}) + (resp/content-type "text/html")))) + content-type/wrap-content-type))