From 048266f0aa2aa742209c6ed3c17ef7094d67cc96 Mon Sep 17 00:00:00 2001 From: flynn Date: Sun, 9 Jun 2019 00:52:31 +0200 Subject: [PATCH] add role list to session --- src/clj/cat/routes/oauth.clj | 1 + 1 file changed, 1 insertion(+) diff --git a/src/clj/cat/routes/oauth.clj b/src/clj/cat/routes/oauth.clj index b76247b..16408a9 100644 --- a/src/clj/cat/routes/oauth.clj +++ b/src/clj/cat/routes/oauth.clj @@ -16,6 +16,7 @@ (cond-> (some (partial = (select-keys user [:zeusid :name])) admins) (-> (assoc-in [:user :admin] {:enabled false}) + (assoc-in [:user :roles] #{:admin}) (assoc :identity "foo"))))] (-> (found redirect-url) (assoc :session new-session))))