Merge pull request #2770 from lexarchik/i2755

fix for #2755
fsprojects · Sep 17, 2017 · 2ee54f5 · 2ee54f5
2 parents 9f4ee1b + b998dbe
commit 2ee54f5
Showing 1 changed file with 9 additions and 1 deletion.
diff --git a/src/Paket.Core/Dependencies/NuGet.fs b/src/Paket.Core/Dependencies/NuGet.fs
@@ -634,6 +634,14 @@ let DownloadAndExtractPackage(alternativeProjectRoot, root, isLocalOverride:bool
     let targetFile = FileInfo targetFileName
     let licenseFileName = getLicenseFile packageName version
 
+    if force then 
+        match configResolved.Path with
+        | Some p ->
+            if verbose then
+                verbosefn "Cleaning %s" p
+            CleanDir p
+        | _ -> ()
+
     let rec getFromCache (caches:Cache list) =
         match caches with
         | cache::rest ->
@@ -673,7 +681,7 @@ let DownloadAndExtractPackage(alternativeProjectRoot, root, isLocalOverride:bool
                     use _ = Profile.startCategory Profile.Category.FileIO
                     let parent = Path.GetDirectoryName targetFileName
                     if not (Directory.Exists parent) then Directory.CreateDirectory parent |> ignore
-                    File.Copy(nupkg.FullName,targetFileName)
+                    File.Copy(nupkg.FullName,targetFileName,true)
                 | _ ->
                 // discover the link on the fly
                 let downloadUrl = ref ""