     (if (> months 1)
         (format "%d months ago" months)
         (cond
-            (== days 0) "one month ago"
-            (>  days 1) (format "one month and %d days ago" days)
-            :else       (format "one month and one day ago"))))
+            (zero? days) "one month ago"
+            (>  days 1)  (format "one month and %d days ago" days)
+            :else        (format "one month and one day ago"))))
 
 (defn format-day
     "Format days/hours in case the given build is younger than one month."

(defn format-seconds
    "Format seconds into human readable format."
    [seconds]
    (if (= seconds 1)
        (format "one second ago")
        (format "%d seconds ago" seconds)))


(defn format-time-
    "Format time into human readable format."
    [amount1 amount2 unit1 unit2]
    (if (one? amount1)
        (cond
            (zero? amount2) (format "one %s ago" unit1)
            (one? amount2)  (format "one %s and one %s ago" unit1 unit2)
            :else           (format "one %s and %d %ss ago" unit1 amount2 unit2))
        (cond
            (zero? amount2) (format "%d %ss ago" amount1 unit1)
            (one? amount2)  (format "%d %ss and one %s ago" amount1 unit1 unit2)
            :else           (format "%d %ss and %d %ss ago" amount1 unit1 amount2 unit2))))


(defn format-month
