fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

refactor(addUser): blind attempt to speed up compilation

Browse Source
This commit is contained in:
Steffen Jost 2022-12-01 09:12:08 +01:00
parent 53eba95e4c
commit d224443721
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Handler/Users/Add.hs
View File

@ -36,9 +36,9 @@ data AdminUserForm = AdminUserForm
} }
data AuthenticationKind = AuthKindLDAP | AuthKindPWHash | AuthKindNoLogin data AuthenticationKind = AuthKindLDAP | AuthKindPWHash | AuthKindNoLogin
deriving (Eq, Ord, Read, Show, Enum, Bounded, Generic, Typeable) deriving (Eq, Ord, Read, Show, Enum, Bounded, Generic, Typeable, Universe, Finite)
instance Universe AuthenticationKind --instance Universe AuthenticationKind
instance Finite AuthenticationKind --instance Finite AuthenticationKind
embedRenderMessage ''UniWorX ''AuthenticationKind id embedRenderMessage ''UniWorX ''AuthenticationKind id
nullaryPathPiece ''AuthenticationKind $ camelToPathPiece' 2 nullaryPathPiece ''AuthenticationKind $ camelToPathPiece' 2