webapp: Added UI to delete repositories. Closes: #689847
This commit is contained in:
parent
e683df9536
commit
c57baaaa30
12 changed files with 245 additions and 6 deletions
2
Test.hs
2
Test.hs
|
@ -851,7 +851,7 @@ cleanup dir = do
|
|||
-- removed via directory permissions; undo
|
||||
recurseDir SystemFS dir >>=
|
||||
filterM doesDirectoryExist >>=
|
||||
mapM_ Utility.FileMode.allowWrite
|
||||
mapM_ Utility.FileMode.allowWrite
|
||||
removeDirectoryRecursive dir
|
||||
|
||||
checklink :: FilePath -> Assertion
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue