Yesod.Comments.Form

Documentation

data CommentForm

Constructors

CommentForm

Fields

formUser :: UserDetails

formThread :: ThreadId

formComment :: Markdown

commentForm :: RenderMessage m FormMessage => ThreadId -> UserDetails -> Maybe Comment -> Form s m CommentForm

commentFromForm :: YesodComments m => CommentForm -> GHandler s m Comment

runForm :: YesodComments m => ThreadId -> Maybe UserDetails -> GWidget s m ()

Run the form and stores the comment on successful submission

runFormWith :: YesodComments m => Maybe Comment -> (CommentForm -> GHandler s m ()) -> ThreadId -> Maybe UserDetails -> GWidget s m ()

Both handle form submission and present form HTML. On FormSuccess, run the given function on the submitted value.