diff --git a/src/Model/Types/Common.hs b/src/Model/Types/Common.hs index 18e3e6b38..8429dfc6b 100644 --- a/src/Model/Types/Common.hs +++ b/src/Model/Types/Common.hs @@ -13,49 +13,53 @@ import Import.NoModel import qualified Yesod.Auth.Util.PasswordStore as PWStore -type Count = Sum Integer -type Points = Centi +type Count = Sum Integer +type Points = Centi -type Email = Text +type Email = Text -type UserTitle = Text -type UserFirstName = Text -type UserSurname = Text -type UserDisplayName = Text -type UserMatriculation = Text +type UserTitle = Text +type UserFirstName = Text +type UserSurname = Text +type UserDisplayName = Text +type UserMatriculation = Text +type UserEmail = CI Email +type UserIdent = CI Text -type StudyDegreeName = Text -type StudyDegreeShorthand = Text -type StudyDegreeKey = Int -type StudyTermsName = Text -type StudyTermsShorthand = Text -type StudyTermsKey = Int -type StudySubTermsKey = Int +type StudyDegreeName = Text +type StudyDegreeShorthand = Text +type StudyDegreeKey = Int +type StudyTermsName = Text +type StudyTermsShorthand = Text +type StudyTermsKey = Int +type StudySubTermsKey = Int -type SchoolName = 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 SchoolName = CI Text +type SchoolShorthand = 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 InstanceId = UUID -type ClusterId = UUID -type TokenId = UUID -type TermCandidateIncidence = UUID +type ExamName = CI Text +type ExamPartName = CI Text +type ExamOccurrenceName = CI Text -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 WorkflowInstanceName = CI Text