Small warning removal
This commit is contained in:
parent
e5dae59d49
commit
4adcbea1f4
1 changed files with 3 additions and 3 deletions
|
@ -89,9 +89,9 @@ bUserToUser bc =
|
||||||
{ nick = Nick (_nick bc)
|
{ nick = Nick (_nick bc)
|
||||||
, email = Email (_email bc)
|
, email = Email (_email bc)
|
||||||
, password = HashedPassword (_password bc)
|
, password = HashedPassword (_password bc)
|
||||||
, role = (case _role bc of
|
, role = case _role bc of
|
||||||
"Admin" -> Admin
|
"Admin" -> Admin
|
||||||
_ -> User)
|
_ -> User
|
||||||
, trust = _trust bc
|
, trust = _trust bc
|
||||||
}
|
}
|
||||||
DefaultMetas
|
DefaultMetas
|
||||||
|
|
Loading…
Reference in a new issue