 
 (defn body->test-info
     [body]
-    (json/read-str body))
+    (json/read-str body :key-fn clojure.core/keyword))
 
 (defn read-job-name-from-uri
     [uri]

              (send-response names)
              (send-response []))))

(defn run-test-handler
    [request]
    (let [job-name  (read-job-name-from-request request)
          test-info (-> (read-request-body request) body->test-info)]
        (println "job name " job-name)
        (println "test info" test-info)
        (send-response {:status :ok})))



(defn unknown-call-handler
    [uri method]
    (db-interface/log-error "Unknown API call" (str "URI: " uri "  method: " method))
    (let [response {:status :error
                    :error "Unknown API call"
                    :uri uri
