Remove form field error duplication in project creation
This commit is contained in:
parent
298bbc57e4
commit
3c95014087
2 changed files with 4 additions and 4 deletions
|
@ -34,9 +34,9 @@ an overview of more-or-less what's left to do before the first release.
|
||||||
[ ] View it
|
[ ] View it
|
||||||
[ ] Log in using it
|
[ ] Log in using it
|
||||||
[ ] Change profile details
|
[ ] Change profile details
|
||||||
[ ] Key management
|
[/] Key management
|
||||||
[/] Add key
|
[/] Add key
|
||||||
[ ] Delete key
|
[/] Delete key
|
||||||
[/] View keys
|
[/] View keys
|
||||||
[ ] Project management
|
[ ] Project management
|
||||||
[/] Tickets
|
[/] Tickets
|
||||||
|
|
|
@ -55,8 +55,8 @@ postProjectsR ident = do
|
||||||
FormMissing -> do
|
FormMissing -> do
|
||||||
setMessage "Field(s) missing"
|
setMessage "Field(s) missing"
|
||||||
defaultLayout $(widgetFile "project/project-new")
|
defaultLayout $(widgetFile "project/project-new")
|
||||||
FormFailure l -> do
|
FormFailure l_ -> do
|
||||||
setMessage $ toHtml $ intercalate "; " l
|
setMessage "Project creation failed, see below"
|
||||||
defaultLayout $(widgetFile "project/project-new")
|
defaultLayout $(widgetFile "project/project-new")
|
||||||
|
|
||||||
getProjectNewR :: Text -> Handler Html
|
getProjectNewR :: Text -> Handler Html
|
||||||
|
|
Loading…
Reference in a new issue