From 780a55756f51459b301943ad6904aebab1c77374 Mon Sep 17 00:00:00 2001 From: Scott Ostler Date: Tue, 22 Jun 2010 18:02:25 -0400 Subject: Handle favorites page for no-user --- src/site.clj | 22 ++++++++++++---------- 1 file changed, 12 insertions(+), 10 deletions(-) (limited to 'src') diff --git a/src/site.clj b/src/site.clj index 347100a..df47e5b 100644 --- a/src/site.clj +++ b/src/site.clj @@ -846,16 +846,18 @@ FROM users u (tagged-dumps-template session params tags url page-title ""))) (defn favorites [session params] - (let [nick (params :nick) - user-info (fetch-nick nick) - user-id (:user_id user-info) - avatar (:avatar user-info) - url (str nick "/favorites") - page-title (str nick "'s favorites") - infobar (build-mini-profile user-info)] - (tagged-dumps-template session params "favorite" url page-title infobar - :tag-user-id user-id - :include-vip (is-vip? session)))) + (if-let [user-info (fetch-nick (params :nick))] + (let [nick (params :nick) + user-info (fetch-nick nick) + user-id (:user_id user-info) + avatar (:avatar user-info) + url (str nick "/favorites") + page-title (str nick "'s favorites") + infobar (build-mini-profile user-info)] + (tagged-dumps-template session params "favorite" url page-title infobar + :tag-user-id user-id + :include-vip (is-vip? session))) + "NO_USER")) (defn json-favorites [session params] (let [nick (params :nick) -- cgit v1.2.3-70-g09d2