Improve implementation of grant-role

skydread1 · Aug 4, 2023 · 80bf6e5 · 80bf6e5
1 parent b23cab1
commit 80bf6e5
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/server/src/flybot/server/core/handler/operation.clj b/server/src/flybot/server/core/handler/operation.clj
@@ -143,9 +143,7 @@
 
           :else
           (let [new-role {:role/name role-to-grant :role/date-granted (utils/mk-date)}]
-            {:response (-> user
-                           (update :user/roles vec)
-                           (update  :user/roles conj new-role))
+            {:response (update user :user/roles #(-> % vec (conj new-role)))
              :effects  {:db {:payload [(assoc user :user/roles [new-role])]}}}))))
 
 (def grant-editor-role