 (.on g/socket "sign-in-success"
   (fn [user-id users]
     (let [users (js->clj users)]
-      (println users)
       (client/sign-in-success! g/app-state user-id users))))
 
 (.on g/socket "user-joined"
   (fn [users]
     (let [users (js->clj users)]
-      (println users)
       (client/user-joined! g/app-state users))))
 
 (.on g/socket "sign-out"

             (dissoc (:files-to-hash @g/app-state) client-id))
      (js/md5File file
        (fn [current-chunk chunks]
          (println "Current chunk:" current-chunk "Chunks:" chunks)
          (.emit g/socket
                 "hash-progress"
                 upload-id


(.on g/socket "start-hashing"
  (fn [client-id upload-id]
    (when-let [file ((:files-to-hash @g/app-state) client-id)]
      (swap! g/app-state
             assoc
