webapp: Added UI to delete repositories. Closes: #689847

This commit is contained in:
Joey Hess 2013-03-31 16:38:05 -04:00
parent e683df9536
commit c57baaaa30
12 changed files with 245 additions and 6 deletions

View file

@ -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