add some delay to requests

Author: beetleman

catacumba-app/src/catacumba_app/routes.clj

@@ -5,6 +5,7 @@
 
 (defn hello-handler
   [context]
+  (Thread/sleep 1000)
   "hello world")
 
 (defn routes [base]

luminus-app/src/clj/luminus_app/routes/services.clj

@@ -3,6 +3,11 @@
             [compojure.api.sweet :refer :all]
             [schema.core :as s]))
 
+
+(defn hello-handler []
+  (Thread/sleep 1000)
+  "hello world")
+
 (defapi service-routes
   {:swagger {:ui "/swagger-ui"
              :spec "/swagger.json"
@@ -11,4 +16,4 @@
                            :description "Sample Services"}}}}
 
     (GET "/" []
-         (ok "hello world")))
+         (ok (hello-handler))))

yada-app/src/yada_app/routes.clj

@@ -2,8 +2,14 @@
   (:require [yada.yada :as yada]))
 
 
+
+(defn hello-handler [ctx]
+  (Thread/sleep 1000)
+  "hello world")
+
+
 (defn routes [base]
   [base
    [
-    ["" (yada/as-resource "hello world")]
+    ["" (yada/as-resource hello-handler)]
     [true (yada/as-resource nil)]]])