Added handling for [2.2,) version ranges.

fsprojects · Nov 11, 2015 · ac40c17 · ac40c17
1 parent f6e92c3
commit ac40c17
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/src/Paket.Core/VersionRange.fs b/src/Paket.Core/VersionRange.fs
@@ -174,6 +174,7 @@ type VersionRequirement =
                         match fromB, toB with
                         | VersionRangeBound.Excluding, VersionRangeBound.Excluding -> GreaterThan(versions.[0])
                         | VersionRangeBound.Including, VersionRangeBound.Including -> Minimum(versions.[0])
+                        | VersionRangeBound.Including, VersionRangeBound.Excluding -> Minimum(versions.[0])
                         | _ -> failParse()
                 | _ -> failParse()
 

diff --git a/tests/Paket.Tests/NugetVersionRangeParserSpecs.fs b/tests/Paket.Tests/NugetVersionRangeParserSpecs.fs
@@ -53,13 +53,15 @@ let ``can detect range version``() =
 
 [<Test>]
 let ``can detect open range version``() = 
+    parseRange "[2.2,)"
+        |> shouldEqual (VersionRange.Minimum (SemVer.Parse "2.2"))
     parseRange "[2.2,]" 
         |> shouldEqual (VersionRange.Minimum (SemVer.Parse "2.2"))
     parseRange "[2.2, ]" 
         |> shouldEqual (VersionRange.Minimum (SemVer.Parse "2.2"))
     parseRange "[,2.2]" 
         |> shouldEqual (VersionRange.Maximum (SemVer.Parse "2.2"))
-        
+
 [<Test>]
 let ``can detect "null" version``() = 
     VersionRequirement.Parse "null"