0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-25 07:58:49 -05:00

Don't call rp/command internal method

This commit is contained in:
Andrey Antukh 2022-07-07 13:12:38 +02:00
parent d60f849089
commit aadb7cb1bf
2 changed files with 7 additions and 7 deletions

View file

@ -206,7 +206,7 @@
;; the returned profile is an NOT authenticated profile, we
;; proceed to logout and show an error message.
(->> (rp/command :login-with-password (d/without-nils params))
(->> (rp/command! :login-with-password (d/without-nils params))
(rx/merge-map (fn [data]
(rx/merge
(rx/of (fetch-profile))
@ -292,7 +292,7 @@
(ptk/reify ::logout
ptk/WatchEvent
(watch [_ _ _]
(->> (rp/command :logout)
(->> (rp/command! :logout)
(rx/delay-at-least 300)
(rx/catch (constantly (rx/of 1)))
(rx/map #(logged-out params)))))))
@ -494,7 +494,7 @@
:or {on-error rx/throw
on-success identity}} (meta data)]
(->> (rp/command :request-profile-recovery data)
(->> (rp/command! :request-profile-recovery data)
(rx/tap on-success)
(rx/catch on-error))))))
@ -513,7 +513,7 @@
(let [{:keys [on-error on-success]
:or {on-error rx/throw
on-success identity}} (meta data)]
(->> (rp/command :recover-profile data)
(->> (rp/command! :recover-profile data)
(rx/tap on-success)
(rx/catch on-error))))))
@ -524,7 +524,7 @@
(ptk/reify ::create-demo-profile
ptk/WatchEvent
(watch [_ _ _]
(->> (rp/command :create-demo-profile {})
(->> (rp/command! :create-demo-profile {})
(rx/map login)))))

View file

@ -90,7 +90,7 @@
(fn [form _event]
(reset! submitted? true)
(let [cdata (:clean-data @form)]
(->> (rp/command :prepare-register-profile cdata)
(->> (rp/command! :prepare-register-profile cdata)
(rx/map #(merge % params))
(rx/finalize #(reset! submitted? false))
(rx/subs
@ -225,7 +225,7 @@
(fn [form _event]
(reset! submitted? true)
(let [params (:clean-data @form)]
(->> (rp/command :register-profile params)
(->> (rp/command! :register-profile params)
(rx/finalize #(reset! submitted? false))
(rx/subs on-success
(partial handle-register-error form))))))]