Skip to content

Commit

Permalink
Let user know when their email is invalid (#504)
Browse files Browse the repository at this point in the history
Co-authored-by: Austin Erlandson <[email protected]>
  • Loading branch information
Austin Erlandson and Austin Erlandson authored Apr 25, 2021
1 parent d3fd11d commit a5e8776
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions fission-web-server/library/Fission/Web/Server/Email/Error.hs
Original file line number Diff line number Diff line change
Expand Up @@ -13,8 +13,8 @@ newtype CouldNotSend = CouldNotSend ClientError
)

instance Display CouldNotSend where
display (CouldNotSend _) = "An error occured while trying to send an email"
display (CouldNotSend _) = "We couldn't send the verification email, please check you've provided a valid email address."


instance ToServerError CouldNotSend where
toServerError couldNotSend = err500 { errBody = displayLazyBS couldNotSend }
toServerError couldNotSend = err422 { errBody = displayLazyBS couldNotSend }

0 comments on commit a5e8776

Please sign in to comment.