(ns user-authentication)

(defn get-user-by-token [token]
  (if-let [user-id (redis/get token)]
    (first (db/select users (where {:id user-id})))
    :unauthorized))