diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/rooms.clj | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/rooms.clj b/src/rooms.clj index a7fe933..8f54640 100644 --- a/src/rooms.clj +++ b/src/rooms.clj @@ -128,12 +128,12 @@ (throw (Exception. (str "Unable to create room " key)))))) (defn- fetch-or-create-bot-id! [nick] - ((comp :user_id first) - (or [(fetch-nick nick)] - (do - (do-select ["INSERT INTO users (nick, hash, email) - VALUES (?, ?, ?) RETURNING user_id" - nick "GARBAGE" "info@dump.fm"]))))) + (:user_id + (or (fetch-nick nick) + (first + (do-select ["INSERT INTO users (nick, hash, email) + VALUES (?, ?, ?) RETURNING user_id" + nick "GARBAGE" "info@dump.fm"]))))) (def room-bot-id-cache (ref {})) |