garbage collector can ignore not existing directories

fsprojects · Aug 20, 2017 · 0de4045 · 0de4045
1 parent ae07516
commit 0de4045
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/Paket.Core/Installation/GarbageCollection.fs b/src/Paket.Core/Installation/GarbageCollection.fs
@@ -25,8 +25,10 @@ let discoverDirectExtractedPackages groupName groupPackagesDirectory : Extracted
         | _ -> None
 
     let findGroupPackages groupName (groupDir:DirectoryInfo) =
-        groupDir.GetDirectories()
-        |> Array.choose (packageInDir groupName)
+        if groupDir.Exists then
+            groupDir.GetDirectories()
+            |> Array.choose (packageInDir groupName)
+        else [||]
 
     let packagesFolder = groupPackagesDirectory
     findGroupPackages groupName packagesFolder