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
|
||||
[ ] Log in using it
|
||||
[ ] Change profile details
|
||||
[ ] Key management
|
||||
[/] Key management
|
||||
[/] Add key
|
||||
[ ] Delete key
|
||||
[/] Delete key
|
||||
[/] View keys
|
||||
[ ] Project management
|
||||
[/] Tickets
|
||||
|
|
|
@ -55,8 +55,8 @@ postProjectsR ident = do
|
|||
FormMissing -> do
|
||||
setMessage "Field(s) missing"
|
||||
defaultLayout $(widgetFile "project/project-new")
|
||||
FormFailure l -> do
|
||||
setMessage $ toHtml $ intercalate "; " l
|
||||
FormFailure l_ -> do
|
||||
setMessage "Project creation failed, see below"
|
||||
defaultLayout $(widgetFile "project/project-new")
|
||||
|
||||
getProjectNewR :: Text -> Handler Html
|
||||
|
|
Loading…
Reference in a new issue