         (send-response response request)))
 
 (defn configuration-handler
+    "REST API handler for the /api/configuration request."
     [request]
     (if (config/verbose-show-configuration? request)
         (let [response (-> request :configuration)]

                                (config/get-prod-test-jobs-suffix request)))

(defn send-response
    [response request]
    (if (config/pretty-print? request)
        (-> (http-response/response (with-out-str (json/pprint response)))

            (http-response/content-type "application/json"))))

(defn send-error-response
    "Send error response (with application/json MIME type) back to the client."
    [response request http-code]
    (if (config/pretty-print? request)
        (-> (http-response/response (with-out-str (json/pprint response)))
