アカウント内のすべての写真セットのリストを取得しようとしています。アプリケーションに書き込みアクセス権を付与しました。写真セットを作成することで、これに書き込みアクセス権があることを確認できますが、リストを読み取ろうとすると、プライベート リストではなくパブリック リストしか取得できません。
(def flickr (new Flickr api-key shared-sercret (new REST)))
(defn get-photo-sets [ ]
(let [;prefs (.getPrefsInterface flickr)
user-id (get-user-id)
photo-sets (.getPhotosets
(.getList (.getPhotosetsInterface flickr) user-id)) ]
(doseq [photo photo-sets] (println (.getTitle photo) ))))