   (if (in-progress? build) (:status build) (:result build)))
 
 (defn determine-build-author [build]
-  (or
-    (-> build :requestedFor :displayName)
-    "N/A"))
+  (or (-> build :requestedFor :displayName) "N/A"))
 
 (defn determine-text [build]
   (let [sep " – "]

        text (determine-text build)]
    (str "<head>"
         "<title>Build Status</title>"
         (if refresh (str "<meta http-equiv=\"refresh\" content=\"" refresh "\" />"))
         "<link rel=\"shortcut icon\" href=\"/favicon_" background-colour ".ico\" />"
         "</head>"
         "<body style=\"background-color:" background-colour ";\">"

      (determine-status-text build))))

(defn tryparse [string]
  (try (Integer. string)
       (catch Exception e nil)))

(defn determine-refresh-rate [params]
