diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/site.clj | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/site.clj b/src/site.clj index 44b0c07..910a76c 100644 --- a/src/site.clj +++ b/src/site.clj @@ -950,6 +950,11 @@ WHERE user_id IN favs (reduce (fn [m fav] (assoc m (str (fav :message_id)) (fav :content))) {} raw-favs)] (str "RawFavs=" (json-str favs)))) +(defn json-log [session params] + (json-str (fetch-dumps-by-nick + :nick (params :nick) + :offset (or (maybe-parse-int (params :offset)) 0)))) + (defn search-query [num-tokens] (str "select url from image_urls @@ -1224,6 +1229,7 @@ WHERE user_id IN (GET "/u/:nick/favorites" (redirect-to (format "/%s/favorites" (params :nick)))) (GET "/u/:nick/favorites/:offset" (redirect-to (format "/%s/favorites" (params :nick)))) (GET "/json/:nick/favorites" (json-favorites session params)) + (GET "/json/:nick/log" (json-log session params)) ; have to put this route after favs (GET "/u/:nick/:offset" (redirect-to (str "/" (params :nick)))) |