Commits

dp wiz committed 422751b

Form context type.

  • Participants
  • Parent commits 85bded0

Comments (0)

Files changed (1)

File Layout/Bootstrap/Forms.hs

 
 -- * Form composition
 
+type FormData = HM.Map T.Text [T.Text]
+
 -- | Form container
 data Form = Form { required :: [Input]
                  , optional :: [Input]
                  , extra    :: [Input]
-                 , formValues :: HM.Map T.Text [T.Text]
-                 , formErrors :: HM.Map T.Text [T.Text]
+                 , formValues :: FormData
+                 , formErrors :: FormData
                  } deriving (Show)
 
 instance ToHtml Form where