       (determine-status-text build))))
 
 (defn tryparse [string]
-  (try (. Integer parseInt string)
+  (try (Integer. string)
        (catch Exception e nil)))
 
 (defn determine-refresh-rate [params]

  (if (in-progress? build) (:status build) (:result build)))

(defn determine-build-author [build]
  (or
    (-> build :requestedFor :displayName)
    "N/A"))

(defn determine-text [build]
  (let [sep " – "]

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