diff options
| author | Jules Laplace <jules@okfoc.us> | 2012-09-13 12:21:38 -0400 |
|---|---|---|
| committer | Jules Laplace <jules@okfoc.us> | 2012-09-13 12:21:38 -0400 |
| commit | be0aa58591496d1df7fea5e621e3be2755274928 (patch) | |
| tree | 9c678a9498892768b076d62b90ebd0d8242d47e6 /src/admin.clj | |
| parent | 5213365b1b2dcdce6f2f61adf0e50861ee1010bc (diff) | |
limit by 2000
Diffstat (limited to 'src/admin.clj')
| -rw-r--r-- | src/admin.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/admin.clj b/src/admin.clj index 53efedf..fc145c1 100644 --- a/src/admin.clj +++ b/src/admin.clj @@ -32,7 +32,7 @@ (def mute-refresh-period-sec 60) (def fetch-new-users-query " -SELECT * FROM users ORDER BY created_on DESC LIMIT 200 +SELECT * FROM users ORDER BY created_on DESC LIMIT 5000 ") (def fetch-active-mutes-query " @@ -180,7 +180,7 @@ AND cancelled = false ;; Recent users list -(defn show-users [session] +(defn show-users [session params] (if-vip (let [st (fetch-template "users" session) users (fetch-new-users) |