Commit 55545802 authored by Ricardo J. Mendez's avatar Ricardo J. Mendez

Using join instead of apply str, as suggested by kibit

parent 4bb4cea1
......@@ -97,8 +97,10 @@
"Returns a display string for a number of seconds"
[seconds]
(letfn [(time-label [major major-label minor minor-label]
(apply str (concat [major major-label]
(when (pos? minor) [" " minor minor-label]))))]
(clojure.string/join
(concat
[major major-label]
(when (pos? minor) [" " minor minor-label]))))]
(cond
(< seconds 1) "< 1s"
(< seconds 60) (str seconds "s")
......
......@@ -213,7 +213,7 @@
title)
display (if (and (= url label)
(< 80 (count label)))
(apply str (concat (take 80 label) "..."))
(clojure.string/join (concat (take 80 label) "..."))
label)
age-ms (- now (:ts tab))
;; Colors picked at http://www.w3schools.com/tags/ref_colorpicker.asp
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment