refactor(model): restructure common types
This commit is contained in:
parent
8dabb63603
commit
0fe4d9f5f5
@ -13,49 +13,53 @@ import Import.NoModel
|
|||||||
import qualified Yesod.Auth.Util.PasswordStore as PWStore
|
import qualified Yesod.Auth.Util.PasswordStore as PWStore
|
||||||
|
|
||||||
|
|
||||||
type Count = Sum Integer
|
type Count = Sum Integer
|
||||||
type Points = Centi
|
type Points = Centi
|
||||||
|
|
||||||
type Email = Text
|
type Email = Text
|
||||||
|
|
||||||
type UserTitle = Text
|
type UserTitle = Text
|
||||||
type UserFirstName = Text
|
type UserFirstName = Text
|
||||||
type UserSurname = Text
|
type UserSurname = Text
|
||||||
type UserDisplayName = Text
|
type UserDisplayName = Text
|
||||||
type UserMatriculation = Text
|
type UserMatriculation = Text
|
||||||
|
type UserEmail = CI Email
|
||||||
|
type UserIdent = CI Text
|
||||||
|
|
||||||
type StudyDegreeName = Text
|
type StudyDegreeName = Text
|
||||||
type StudyDegreeShorthand = Text
|
type StudyDegreeShorthand = Text
|
||||||
type StudyDegreeKey = Int
|
type StudyDegreeKey = Int
|
||||||
type StudyTermsName = Text
|
type StudyTermsName = Text
|
||||||
type StudyTermsShorthand = Text
|
type StudyTermsShorthand = Text
|
||||||
type StudyTermsKey = Int
|
type StudyTermsKey = Int
|
||||||
type StudySubTermsKey = Int
|
type StudySubTermsKey = Int
|
||||||
|
|
||||||
type SchoolName = CI Text
|
type SchoolName = CI Text
|
||||||
type SchoolShorthand = CI Text
|
type SchoolShorthand = CI Text
|
||||||
type CourseName = CI Text
|
|
||||||
type CourseShorthand = CI Text
|
|
||||||
type SheetName = CI Text
|
|
||||||
type MaterialName = CI Text
|
|
||||||
type UserEmail = CI Email
|
|
||||||
type UserIdent = CI Text
|
|
||||||
type TutorialName = CI Text
|
|
||||||
type ExamName = CI Text
|
|
||||||
type ExamPartName = CI Text
|
|
||||||
type ExamOccurrenceName = CI Text
|
|
||||||
type AllocationName = CI Text
|
|
||||||
type AllocationShorthand = CI Text
|
|
||||||
|
|
||||||
type SubmissionGroupName = CI Text
|
type CourseName = CI Text
|
||||||
|
type CourseShorthand = CI Text
|
||||||
|
type MaterialName = CI Text
|
||||||
|
type TutorialName = CI Text
|
||||||
|
type SheetName = CI Text
|
||||||
|
type SubmissionGroupName = CI Text
|
||||||
|
|
||||||
type PWHashAlgorithm = ByteString -> PWStore.Salt -> Int -> ByteString
|
type ExamName = CI Text
|
||||||
type InstanceId = UUID
|
type ExamPartName = CI Text
|
||||||
type ClusterId = UUID
|
type ExamOccurrenceName = CI Text
|
||||||
type TokenId = UUID
|
|
||||||
type TermCandidateIncidence = UUID
|
|
||||||
|
|
||||||
type SessionFileReference = Digest SHA3_256
|
type AllocationName = CI Text
|
||||||
|
type AllocationShorthand = CI Text
|
||||||
|
|
||||||
|
type PWHashAlgorithm = ByteString -> PWStore.Salt -> Int -> ByteString
|
||||||
|
|
||||||
|
type InstanceId = UUID
|
||||||
|
type ClusterId = UUID
|
||||||
|
type TokenId = UUID
|
||||||
|
|
||||||
|
type TermCandidateIncidence = UUID
|
||||||
|
|
||||||
|
type SessionFileReference = Digest SHA3_256
|
||||||
|
|
||||||
type WorkflowDefinitionName = CI Text
|
type WorkflowDefinitionName = CI Text
|
||||||
type WorkflowInstanceName = CI Text
|
type WorkflowInstanceName = CI Text
|
||||||
|
|||||||
Reference in New Issue
Block a user