From 4b2986ed19c4a57516fbbba71e525383a1f8b437 Mon Sep 17 00:00:00 2001 From: sostler Date: Fri, 28 May 2010 04:00:37 -0400 Subject: Added fav notification --- src/user.clj | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'src/user.clj') diff --git a/src/user.clj b/src/user.clj index d105e29..387a7ad 100644 --- a/src/user.clj +++ b/src/user.clj @@ -2,6 +2,12 @@ (:use compojure utils)) +(defstruct user-struct :nick :user_id :avatar :last-seen) + +(defn user-struct-from-session [session] + (struct user-struct (session :nick) (session :user_id) (session :avatar) + (System/currentTimeMillis))) + (def *nick-regex* #"^[A-Za-z0-9\-_âˆb˚†]*$") (defn is-invalid-nick? [n] -- cgit v1.2.3-70-g09d2