                   :extras "original_format,description,path_alias"}
       (fn [data]
         (swap! world assoc-in [:sets id]
-          (with-meta (js->clj (.-photoset data) :keywordize-keys true)
+          (with-meta (js->clj (aget data "photoset") :keywordize-keys true)
             {:state :fetched}))))))
 
 (defn fetch-comments [set-id idx]

                    :photo_id (:id photo)}
        (fn [data]
          (swap! world assoc-in [:sets set-id :photo idx :comments]
            (with-meta (js->clj (.-comments data) :keywordize-keys true)
              {:state :fetched})))))))

(defn fetch-user-sets [username]

                  :url (str "https://flickr.com/photos/" username)}
      (fn [data]
        (swap! world assoc-in [:users username]
          (with-meta (js->clj (aget data "user") :keywordize-keys true)
            {:state :fetched}))
        (fetch-user-sets username)
        #_ (fetch-user-info username)))))
