diff options
| -rwxr-xr-x | src/site.clj | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/site.clj b/src/site.clj index 6efbd2f..2ed5892 100755 --- a/src/site.clj +++ b/src/site.clj @@ -416,11 +416,10 @@ (let [res (do-select [qry]) keys (map :user_id res) dict (zipmap keys res)] - (map (fn [u] - (let [u-id (u :user_id)] - (stringify-and-escape (merge u (dict u-id))))) - users)) - []))) + (map (fn [u] + (let [u-id (u :user_id)] + (stringify-and-escape (merge u (dict u-id))))) + users))))) (defn update-directory! [] (let [qry "SELECT u.user_id, COUNT(m) as cnt |