chore: move Utils.Exam to Utils.Exam.Correct
This commit is contained in:
parent
6244a250ee
commit
f2e6435a03
@ -14,7 +14,7 @@ import Database.Persist.Sql (transactionUndo)
|
|||||||
import Handler.Utils
|
import Handler.Utils
|
||||||
import Handler.Utils.Exam (fetchExam)
|
import Handler.Utils.Exam (fetchExam)
|
||||||
|
|
||||||
import Utils.Exam
|
import Utils.Exam.Correct
|
||||||
|
|
||||||
|
|
||||||
-- | Minimum length of a participant identifier. Identifiers that are shorter would result in too many query results and are therefor rejected.
|
-- | Minimum length of a participant identifier. Identifiers that are shorter would result in too many query results and are therefor rejected.
|
||||||
|
|||||||
@ -15,7 +15,7 @@ import Handler.Utils
|
|||||||
import Handler.Utils.ExternalExam
|
import Handler.Utils.ExternalExam
|
||||||
import Handler.Utils.Users
|
import Handler.Utils.Users
|
||||||
|
|
||||||
import Utils.Exam
|
import Utils.Exam.Correct
|
||||||
|
|
||||||
|
|
||||||
-- | Minimum length of a participant identifier. Identifiers that are shorter would result in too many query results and are therefor rejected.
|
-- | Minimum length of a participant identifier. Identifiers that are shorter would result in too many query results and are therefor rejected.
|
||||||
|
|||||||
@ -1,4 +1,4 @@
|
|||||||
module Utils.Exam
|
module Utils.Exam.Correct
|
||||||
( CorrectInterfaceRequest(..)
|
( CorrectInterfaceRequest(..)
|
||||||
, CorrectInterfaceResponse(..), ciResponseStatus
|
, CorrectInterfaceResponse(..), ciResponseStatus
|
||||||
, CorrectInterfaceUser(..), userToResponse
|
, CorrectInterfaceUser(..), userToResponse
|
||||||
Reference in New Issue
Block a user