add name to tests
This commit is contained in:
parent
f6dce92d8d
commit
9a5104cbb4
@ -96,6 +96,7 @@ checkTestDir chan challengeId commit testDir = do
|
|||||||
checksum <- liftIO $ gatherSHA1 testDir
|
checksum <- liftIO $ gatherSHA1 testDir
|
||||||
testId <- runDB $ insert $ Test {
|
testId <- runDB $ insert $ Test {
|
||||||
testChallenge=challengeId,
|
testChallenge=challengeId,
|
||||||
|
testName=T.pack testDir,
|
||||||
testChecksum=(SHA1 checksum),
|
testChecksum=(SHA1 checksum),
|
||||||
testCommit=commit,
|
testCommit=commit,
|
||||||
testActive=True }
|
testActive=True }
|
||||||
|
@ -27,8 +27,9 @@ Challenge
|
|||||||
stamp UTCTime default=now()
|
stamp UTCTime default=now()
|
||||||
Test
|
Test
|
||||||
challenge ChallengeId
|
challenge ChallengeId
|
||||||
|
name Text
|
||||||
checksum SHA1
|
checksum SHA1
|
||||||
commit SHA1
|
commit SHA1
|
||||||
active Bool default=True
|
active Bool default=True
|
||||||
UniqueChallengeChecksum challenge checksum
|
UniqueChallengeChecksum challenge name checksum
|
||||||
-- By default this file is used in Model.hs (which is imported by Foundation.hs)
|
-- By default this file is used in Model.hs (which is imported by Foundation.hs)
|
||||||
|
Loading…
Reference in New Issue
Block a user