diff options
Diffstat (limited to 'src/site.clj')
| -rw-r--r-- | src/site.clj | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/src/site.clj b/src/site.clj index 2197dd5..45ee9e5 100644 --- a/src/site.clj +++ b/src/site.clj @@ -25,7 +25,6 @@ user)) (defstruct user-struct :nick :user_id :avatar :last-seen) -(defstruct message-struct :nick :content :created_on :msg_id) (defn user-struct-from-session [session] (struct user-struct (session :nick) (session :user_id) (session :avatar) @@ -584,9 +583,6 @@ FROM users u ((first (do-select [qry user-id room-id content is-image])) :message_id)))) -(defn build-msg [nick content msg-id] - (struct message-struct nick content (new Date) msg-id)) - (defn msg [session params] (let [user-id (session :user_id) mute ((poll *active-mutes*) user-id) |