   ((.scriptWrap redis-lua "getAllMusicInfo") 0 room-id
     (fn [err music-info-reply]
       (let [info (js->clj music-info-reply)
-            reader (transit/reader :json)
+            reader (transit/reader :json-verbose)
             info-to-send (map #(transit/read reader %1) info)]
         (if (empty? info-to-send)
           (callback nil nil)

            (callback)))))))

(defn resume-current-track [room callback]
  (let [reader (transit/reader :json)]
    (.get redis-client (redis-room-prefix room "track-position")
      (fn [err reply]
        (let [old-track-position-info (transit/read reader reply)
              new-track-position-info (merge old-track-position-info {:start-time (.now js/Date)})
              writer (transit/writer :json)]
          (.set redis-client (redis-room-prefix room "track-position")
                             (transit/write writer new-track-position-info)
            (fn []

                            (fn []
                              (.get redis-client (str "file-hash:" file-hash)
                                (fn [err music-info-reply]
                                  (let [reader (transit/reader :json-verbose)
                                        music-info-json (transit/read reader music-info-reply)
                                        music-info (js->clj music-info-json)]
                                    (callback music-info)))))))))))))))))))
