 (def default-tile-width 160)
 
 (defn add-last-tile
-  "Adds a tile to take you to the next page if necessary."
   [content results]
   (if (> (count results) limit)
     (let [next-page (-> (get content :page)

              grid-content (-> first-tiles
                               (concat results)
                               (remove-dupes-and-nils)
                               (vec))]
          (on-ui (set-grid-view-tiles context grid-content grid-view)))
        false))
    view))


                                (concat pics)
                                (remove-dupes-and-nils)
                                (vec))
              tiles (create-grid-view-tiles context total-results grid-view)]
          (if (nil? (get post :body))
            (on-ui (toast (get-string :lost_post)))
            (on-ui 
              (set-text-content context
                                text-view
                                (tags-encode :post (get post :body)))
              (let [date-format (java.text.DateFormat/getDateTimeInstance
                                  java.text.DateFormat/MEDIUM
                                  java.text.DateFormat/SHORT)]
                (.setText date-view (->> (get post :time)
                                         (java.util.Date.)
                                         (.format date-format))))
              (set-grid-view-tiles tiles grid-view))))
        false))
    view))

