From 25f6bb92ef2920d4d97fcf443573f0b09d3bb14f Mon Sep 17 00:00:00 2001 From: Scott Ostler Date: Mon, 29 Nov 2010 01:43:58 -0500 Subject: Load messages for all users, only show for vips --- src/site.clj | 6 ++---- template/profile.st | 4 ++-- 2 files changed, 4 insertions(+), 6 deletions(-) diff --git a/src/site.clj b/src/site.clj index 67fc8d4..fc7d541 100644 --- a/src/site.clj +++ b/src/site.clj @@ -393,10 +393,8 @@ ORDER BY cnt DESC :user-tag-id (:user_id session) :nick profile-nick :limit 10) - dms (if-vip - (fetch-private-messages (:user_id user-info))) - recips (if dms - (set (apply concat (map #(get % "recips") dms)))) + dms (fetch-private-messages (:user_id user-info)) + recips (set (apply concat (map #(get % "recips") dms))) imgs (pull-random-dump-images dumps 5)] (do (.setAttribute st "is_home" is-home) diff --git a/template/profile.st b/template/profile.st index 6f44058..ce0a9e6 100644 --- a/template/profile.st +++ b/template/profile.st @@ -91,14 +91,14 @@ - $if(dms)$ + $if(isadmin)$

Messages

$dms: { dm |
$dm.nick$ - + $dm.content$