test clojure app

2015-02-03 16:46:04 -08:00
parent 89df6eeded
commit 1c02ef9674
6 changed files with 31 additions and 0 deletions
--- a/tests/apps/clojure/src/sample/app.clj
+++ b/tests/apps/clojure/src/sample/app.clj
@@ -0,0 +1,13 @@
+(ns sample.app
+  (:require [ring.adapter.jetty :as jetty]
+            [compojure.core :refer [defroutes GET]]))
+
+(defroutes handler
+  (GET "/" []
+       {:headers {"Content-type" "text/plain; charset=UTF-8"}
+        :body "Hello World!"}))
+
+(defn -main []
+  (jetty/run-jetty handler
+                   {:port (Integer. (or (System/getenv "PORT") "5000"))
+                    :join? false}))