forked from filipg/gonito
fixed directory names
This commit is contained in:
parent
3dfec2d6f4
commit
b148cc37fc
4
.gitignore
vendored
4
.gitignore
vendored
@ -18,5 +18,5 @@ cabal.sandbox.config
|
||||
*.swp
|
||||
*.keter
|
||||
*~
|
||||
arena/t-*
|
||||
arena/r-*
|
||||
arena/t*
|
||||
arena/r*
|
||||
|
@ -127,7 +127,7 @@ cloneRepo url branch chan = do
|
||||
return Nothing
|
||||
|
||||
getRepoDir :: Key Repo -> FilePath
|
||||
getRepoDir repoId = arena </> repoIdAsString
|
||||
getRepoDir repoId = arena </> ("r" ++ repoIdAsString)
|
||||
where repoIdAsString = show $ fromSqlKey repoId
|
||||
|
||||
checkRepoUrl :: Text -> Bool
|
||||
|
Loading…
Reference in New Issue
Block a user