realworld-hs-0.1.0.0: Scotty impl of https://github.com/gothinkster/realworld
Safe HaskellSafe-Inferred
LanguageGHC2021

Conduit.Features.Account.User.GetUser

Documentation

handleGetUser :: ScottyT AppM () Source #

getUser :: AcquireUser m => AuthedUser -> m (Either AccountError UserAuth) Source #

mkUser :: Text -> UserInfo -> UserAuth Source #

class Monad m => AcquireUser m where Source #

Methods

findUserById :: UserID -> m (Either AccountError UserInfo) Source #

Instances

Instances details
(Monad m, MonadUnliftIO m, MonadDB m) => AcquireUser m Source # 
Instance details

Defined in Conduit.Features.Account.User.GetUser

Methods

findUserById :: UserID -> m (Either AccountError UserInfo) Source #

data UserInfo Source #

Constructors

UserInfo 

Fields

Instances

Instances details
ToJSON UserInfo Source # 
Instance details

Defined in Conduit.Features.Account.User.GetUser

Methods

toJSON :: UserInfo -> Value #

toEncoding :: UserInfo -> Encoding #

toJSONList :: [UserInfo] -> Value #

toEncodingList :: [UserInfo] -> Encoding #

omitField :: UserInfo -> Bool #

Generic UserInfo Source # 
Instance details

Defined in Conduit.Features.Account.User.GetUser

Associated Types

type Rep UserInfo :: Type -> Type #

Methods

from :: UserInfo -> Rep UserInfo x #

to :: Rep UserInfo x -> UserInfo #

type Rep UserInfo Source # 
Instance details

Defined in Conduit.Features.Account.User.GetUser

type Rep UserInfo = D1 ('MetaData "UserInfo" "Conduit.Features.Account.User.GetUser" "realworld-hs-0.1.0.0-inplace" 'False) (C1 ('MetaCons "UserInfo" 'PrefixI 'True) ((S1 ('MetaSel ('Just "name") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "email") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "bio") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "image") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))))

mkUserInfo :: Entity User -> UserInfo Source #