Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-24 23:49:45 -05:00
Code Issues Activity

Simplified login event.

Browse source
This commit is contained in:
Andrey Antukh 2016-05-16 13:27:10 +03:00
parent 6eb65bfe39
commit c8d48d4667
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/uxbox/data/auth.cljs
View file

@ -28,7 +28,8 @@
rs/WatchEvent
(-apply-watch [this state s]
(rx/of (r/navigate :dashboard/projects)))
(rx/of (udu/fetch-profile)
(r/navigate :dashboard/projects)))
rs/EffectEvent
(-apply-effect [this state]
@ -53,13 +54,12 @@
(-apply-watch [this state s]
(let [params {:username username
:password password
:scope "webapp"}]
:scope "webapp"}
on-error #(udm/error (tr "errors.auth.unauthorized"))]
(->> (rp/req :fetch/token params)
(rx/map :payload)
(rx/mapcat #(rx/of (logged-in %)
(udp/fetch-projects)
(udu/fetch-profile)))
(rx/catch rp/client-error? #(udm/error (tr "errors.auth.unauthorized")))))))
(rx/map logged-in)
(rx/catch rp/client-error? on-error)))))
(defn login
[params]