Baguette/dnsmanager-webclient
3
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Don't show error position on wrongly sized password.

Browse Source
This commit is contained in:
Philippe Pittoli 2024-11-07 17:37:28 +01:00
parent 44f696e170
commit d9fc823886
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/App/Page/Authentication.purs
View File

@ -185,8 +185,9 @@ render { current_tab, authenticationForm, passwordRecoveryForm, newPasswordForm,
show_error_password :: P.Error -> String
show_error_password = case _ of
P.ParsingError {error, position} ->
"position " <> show position <> " " <> maybe "" string_error_password error
--P.ParsingError {error, position} ->
-- "position " <> show position <> " " <> maybe "" string_error_password error
P.ParsingError {error} -> maybe "" string_error_password error
string_error_password :: P.PasswordParsingError -> String
string_error_password = case _ of