Documentation

class YesodMarkdownRender site where Source

getMarkdownRender :: a -> MarkdownRender Source

postMarkdownRenderR :: HandlerT MarkdownRender (HandlerT site IO) Html Source

markdownToHtmlCustom :: Markdown -> Html Source

data FieldConfig m a Source

fcValidate :: Functor f => ((a -> m (Either (SomeMessage (HandlerSite m)) a)) -> f (a -> m (Either (SomeMessage (HandlerSite m)) a))) -> FieldConfig m a -> f (FieldConfig m a) Source

fcReadonly :: Functor f => (Bool -> f Bool) -> FieldConfig m a -> f (FieldConfig m a) Source

fcValue :: Functor f => (Maybe a -> f (Maybe a)) -> FieldConfig m a -> f (FieldConfig m a) Source

fcName :: Functor f => (Maybe Text -> f (Maybe Text)) -> FieldConfig m a -> f (FieldConfig m a) Source

fcId :: Functor f => (Maybe Text -> f (Maybe Text)) -> FieldConfig m a -> f (FieldConfig m a) Source

fcTooltip :: Functor f => (Maybe (SomeMessage (HandlerSite m)) -> f (Maybe (SomeMessage (HandlerSite m)))) -> FieldConfig m a -> f (FieldConfig m a) Source

fcPlaceholder :: Functor f => (Maybe (SomeMessage (HandlerSite m)) -> f (Maybe (SomeMessage (HandlerSite m)))) -> FieldConfig m a -> f (FieldConfig m a) Source

fcLabel :: Functor f => (Maybe (WidgetT (HandlerSite m) IO ()) -> f (Maybe (WidgetT (HandlerSite m) IO ()))) -> FieldConfig m a -> f (FieldConfig m a) Source

render :: Monad m => GForm (WidgetT site IO ()) m a -> Html -> MForm m (FormResult a, WidgetT site IO ()) Source

greenOnSuccess :: Bool Source

simple Source

class YesodTypeahead site where Source

typeahead :: (YesodTypeahead site, MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => Route site -> FieldConfig m Text -> GForm (WidgetT site IO ()) m Text Source

typeaheadJs :: Route site -> Text -> WidgetT site IO () Source

simpleCheck Source

select :: (RenderMessage site FormMessage, Eq a) => HandlerT site IO (OptionList a) -> FieldConfig (HandlerT site IO) a -> GForm (WidgetT site IO ()) (HandlerT site IO) a Source

newtype UploadFilename Source

class YesodUpload site where Source

yaml :: (FromJSON a, ToJSON a, HandlerSite m ~ site, MonadHandler m, RenderMessage site FormMessage) => a -> FieldConfig m a -> GForm (WidgetT site IO ()) m a Source

yamlJs :: Text -> Text -> WidgetT site IO () Source

markdown :: (YesodMarkdownRender site, MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m Markdown -> GForm (WidgetT site IO ()) m Markdown Source

markdownJs :: Text -> Text -> Text -> WidgetT site IO () Source

file :: (YesodUpload site, MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m UploadFilename -> GForm (WidgetT site IO ()) m UploadFilename Source

fileParseHelper Source

moveIt :: String -> FileInfo -> IO UploadFilename Source

randomUpperConsonantText :: Int -> IO Text Source

isVowel :: Char -> Bool Source

simpleCheckJs :: Text -> Text -> WidgetT site IO () Source

bindFormResult :: FormResult a -> (a -> FormResult b) -> FormResult b Source

ifA :: Applicative f => f Bool -> f a -> f a -> f a Source

boolAttrs :: [(Text, Bool)] -> [(Text, Text)] Source

labelAndInput :: WidgetT site IO () -> Text -> Text -> Bool -> Text -> WidgetT site IO () Source

fieldParseToGParse :: MonadHandler m => ([Text] -> [FileInfo] -> m (Either (SomeMessage (HandlerSite m)) (Maybe a))) -> [Text] -> [FileInfo] -> m (FormResult a) Source

fullValidate :: MonadHandler m => ([Text] -> [FileInfo] -> m (FormResult a)) -> (a -> m (Either (SomeMessage (HandlerSite m)) a)) -> [Text] -> [FileInfo] -> m (FormResult a) Source

text :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m Text -> GForm (WidgetT site IO ()) m Text Source

textOpt :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m (Maybe Text) -> GForm (WidgetT site IO ()) m (Maybe Text) Source

textCheck :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m (Maybe Text) -> GForm (WidgetT site IO ()) m (Maybe Text) Source

int :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m Int -> GForm (WidgetT site IO ()) m Int Source

intCheck :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m (Maybe Int) -> GForm (WidgetT site IO ()) m (Maybe Int) Source

day :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m Day -> GForm (WidgetT site IO ()) m Day Source

dayCheck :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m (Maybe Day) -> GForm (WidgetT site IO ()) m (Maybe Day) Source

bool :: (MonadHandler m, HandlerSite m ~ site, RenderMessage site FormMessage) => FieldConfig m Bool -> GForm (WidgetT site IO ()) m Bool Source

checkBoxParser :: Text -> Either (SomeMessage site) Bool Source

textEmailValidate :: Text -> Either FormMessage Text Source

submit :: Monad m => Context -> Text -> GForm (WidgetT site IO ()) m () Source

parseInt :: RenderMessage site FormMessage => Text -> Either (SomeMessage site) Int Source

gparseHelper Source

whenMaybe :: Applicative m => Maybe a -> (a -> m ()) -> m () Source