basic permissions
This commit is contained in:
@@ -34,13 +34,14 @@
|
||||
]
|
||||
(println "authenticated as user" user)
|
||||
|
||||
;; TODO - these namespaces are not being transmitted/deserialized properly
|
||||
(if (and token user)
|
||||
{:status 301
|
||||
:headers {"Location" (str "/?jwt=" (jwt/sign {:user "test"
|
||||
:headers {"Location" (str "/?jwt=" (jwt/sign {:user (:name profile)
|
||||
:exp (time/plus (time/now) (time/days 7))
|
||||
:companies (:user/clients user)
|
||||
:role (name (:user/role user))
|
||||
:name (:name profile)}
|
||||
:user/clients (:user/clients user)
|
||||
:user/role (name (:user/role user))
|
||||
:user/name (:name profile)}
|
||||
(:jwt-secret env)
|
||||
{:alg :hs512}))}}
|
||||
{:status 401
|
||||
|
||||
Reference in New Issue
Block a user