   (-> (select :email)
       (from :users)))
 
-(defn admins []
+(defn get-admins []
   (-> (get-admins-map)
       db/query
       :result

        (select :quote)
        (where [:= :week_id cur-week-id]))))

(defn submissions []
  (-> (get-submissions-map)
      db/query
      :result

      (where [:= :users.email email])))

(defn rm-user [email]
  (-> (rm-sessions-map email)
      db/query
      response))
