         (select :quote)
         (where [:= :week_id cur-week-id]))))
 
-(defn submissions []
+(defn get-submissions []
   (-> (get-submissions-map)
       db/query
       :result

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

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

  (-> (select :email)
      (from :users)))

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