avoid crash when directory doesn't exist

This commit is contained in:
Joey Hess 2012-08-24 13:59:24 -04:00
parent e58d19b533
commit a52c552f0b

View file

@ -55,6 +55,7 @@ transferScannerThread st dstatus scanremotes transferqueue = do
- are first removed. - are first removed.
-} -}
startupScan = do startupScan = do
void $ tryIO $
removeDirectoryRecursive removeDirectoryRecursive
=<< runThreadState st (fromRepo transferScannedDir) =<< runThreadState st (fromRepo transferScannedDir)
addScanRemotes scanremotes True addScanRemotes scanremotes True