Fix smart install when we add a pinned version - fixes #777

fsprojects · Apr 14, 2015 · e4aca73 · e4aca73
1 parent 8dcb9a1
commit e4aca73
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 2 deletions.
diff --git a/RELEASE_NOTES.md b/RELEASE_NOTES.md
@@ -1,3 +1,6 @@
+## 0.41.3 - 14.04.2015
+* BUGFIX: Fix smart install when we add a pinned version - https://github.com/fsprojects/Paket/issues/777
+
 #### 0.41.2 - 14.04.2015
 * Trace NuGet server response in verbose mode - https://github.com/fsprojects/Paket/issues/775
 

diff --git a/src/Paket.Core/DependencyChangeDetection.fs b/src/Paket.Core/DependencyChangeDetection.fs
@@ -10,8 +10,12 @@ let findChangesInDependenciesFile(dependenciesFile:DependenciesFile,lockFile:Loc
 
     let added =
         dependenciesFile.DirectDependencies
-        |> Seq.map (fun d -> NormalizedPackageName d.Key)
-        |> Seq.filter (lockFile.ResolvedPackages.ContainsKey >> not)
+        |> Seq.map (fun d -> NormalizedPackageName d.Key,d.Value)
+        |> Seq.filter (fun (name,vr) ->
+            match lockFile.ResolvedPackages.TryFind name with
+            | Some p -> not (vr.IsInRange p.Version) 
+            | _ -> true)
+        |> Seq.map fst
         |> Set.ofSeq
 
     let modified =