Added text to VIP log

2 files changed, 4 insertions, 2 deletions

diff --git a/db/0-create.psql b/db/0-create.psql
index 7c6b4b0..4a134f5 100755
--- a/db/0-create.psql
+++ b/db/0-create.psql
@@ -44,6 +44,7 @@ CREATE INDEX room_id_idx ON messages (room_id);
 CREATE INDEX created_on_idx ON messages (created_on);
 
 CREATE INDEX src_user_id_idx ON favorites (src_user_id);
+CREATE INDEX favorites_created_on_idx on favorites (created_on);
 
 INSERT INTO rooms (key, name, description, admin_only) 
        VALUES ('RoomA', 'Room A', 'Hangout', false);
diff --git a/src/site.clj b/src/site.clj
index 653e99a..4f6ca71 100755
--- a/src/site.clj
+++ b/src/site.clj
@@ -425,9 +425,10 @@
   (let [st (fetch-template "log" session)
 	offset (maybe-parse-int offset 0)
         dump-offset (* offset dumps-per-page)
+        image-only (not (room :admin_only))
 	dumps (to-array (map process-message-for-output
-			     (fetch-messages-by-room (room :room_id) true dump-offset)))
-	dump-count (count-messages-by-room (room :room_id) true)]
+			     (fetch-messages-by-room (room :room_id) image-only dump-offset)))
+	dump-count (count-messages-by-room (room :room_id) image-only)]
     (if (< (+ dump-offset dumps-per-page) dump-count)
       (.setAttribute st "next" (inc offset)))
     (if (not= offset 0)