summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/site.clj22
1 files changed, 12 insertions, 10 deletions
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)