      :search-term ""
      }))
 
+(defn mmss [seconds]
+  (let [m (quot seconds 60)
+        s (- seconds (* 60 m))]
+    (str m ":" (.substr (str "000" s) -2))))
+
+
+#_(println (mmss 20) (mmss 40) (mmss 60) (mmss 80)
+         (mmss 200) (mmss 4000) (mmss 6000) (mmss 381))
+
 (defn results-track-view [track owner]
   (reify
     om/IRenderState

               (dom/span #js {:className "artist"} (get track "artist"))
               (dom/span #js {:className "album"} (get track "album" ))
               (dom/span #js {:className "title"} (get track "title"))
               (dom/span #js {:className "duration"} (get track "length"))
               (dom/button #js {:onClick (fn [e] (put! dequeue @track))}
                           "-")))))


      (dom/div #js {:className "track"}
               (dom/span #js {:className "artist"} (get track "artist"))
               (dom/span #js {:className "album"} (get track "album" ))
               (dom/span #js {:className "title"}
                         (str (get track "track") " - " (get track "title")))
               (dom/span #js {:className "duration"} (mmss (get track "length")))
               (dom/button #js {:onClick (fn [e] (put! enqueue @track))}
                           "+")))))

