MK
но во всяких
*arrow* библиотеках встречаетсяSize: a a a
MK
*arrow* библиотеках встречаетсяAG
(already-logged-in!) тоже наоборотMK
(or
(!already-logged-in session)
(or
(!has-additional-messages msgs)
(let [user (->user msgs password->digest)]
(or
(!has-validation-errors user)
(let [user (fill-id user new-user-ids)
id (-> user agg/root :agg/id)]
{:set-session (assoc session :current-user-id id),
:persist [user],
:reaction {:type :show-screen, :name :main}})))))
MK
(already-logged-in!) тоже наоборотAG
AG
AG
MK
-> и ->> нифига не очевидноMK
AG
-> и ->> нифига не очевидноMK
AG
<<-, reverse body, !symbolOR
AB
ST
ST
AB
ST
ST
ST