Use haddock for Yesod.Form.Types.Field

This commit is contained in:
Arash Rouhani 2012-09-22 18:58:34 -04:00
parent 34f2942c54
commit e35124f96f

View File

@ -125,12 +125,11 @@ data FieldView sub master = FieldView
data Field sub master a = Field data Field sub master a = Field
{ fieldParse :: [Text] -> GHandler sub master (Either (SomeMessage master) (Maybe a)) { fieldParse :: [Text] -> GHandler sub master (Either (SomeMessage master) (Maybe a))
-- | ID, name, attrs, (invalid text OR legimiate result), required? , fieldView :: Text -- ^ ID
, fieldView :: Text -> Text -- ^ Name
-> Text -> [(Text, Text)] -- ^ Attributes
-> [(Text, Text)] -> Either Text a -- ^ Either (invalid text) or (legitimate result)
-> Either Text a -> Bool -- ^ Required?
-> Bool
-> GWidget sub master () -> GWidget sub master ()
} }