fix tests

fsprojects · Apr 11, 2016 · 65e554e · 65e554e
1 parent 062d95f
commit 65e554e
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Paket.Core/Utils.fs b/src/Paket.Core/Utils.fs
@@ -91,7 +91,8 @@ let CleanDir path =
             deleteDir di
         with
         | exn -> failwithf "Error during deletion of %s%s  - %s" di.FullName Environment.NewLine exn.Message 
-    Directory.CreateDirectory path |> ignore
+    else
+        Directory.CreateDirectory path |> ignore
     // set writeable
     try
         File.SetAttributes (path, FileAttributes.Normal)