         over_i8 (:over_i8 p)
         author (:author p)]
     (println id ": " title " by " author " (" url ")")))
-
-(defn get-saved-posts []
-  (js/console.log "Retreiving saved posts...")
-  (go (let [response (<! (http/get (str "https://oauth.reddit.com/user/" (:username @app-state) "/saved")
-                                   {:with-credentials? false
-                                    :oauth-token (:token @app-state)}))
-            posts (-> response :body :data :children)
-            error (-> response :body :error)]
-        (println "received response")
-        (println response)
-        (if (clojure.string/blank? error)
-          (doseq [p posts]
-            #_(println (process-json-post p))
-            (swap! saved-posts #(conj % %2) (assoc (:data p) :key (-> p :data :id))))
-          (handle-error (str error " " (:error-text response) "\nYour API token might've expired"))))))
 
 (defn process-after-token-acquire []
   (js/console.log "Token acquired...")

            :on-click (fn [] (alandipert.storage-atom/remove-local-storage! :saved-for-reddit-app-state)
                        (set! (.-location js/window) "/"))}]])

(defn post-html [p]
  (let [link? (nil? (:title p))
        title (unescapeEntities (if link? (:link_title p) (:title p)))
        url (if link? (str (:link_url p) (:key p)) (:url p))
        body (if (not (nil? (:body_html p))) (unescapeEntities (:body_html p)))
        subreddit (:subreddit p)
        author (:author p)

(defn set-app-state-field [field value]
  (swap! app-state update-in [field] #(str value))
  value)

(defn error-html []
  [:div {:class "alert alert-danger" :role "alert"}
