Add failing test for #584

fsprojects · Feb 8, 2015 · ed3ba96 · ed3ba96
1 parent 5017cc5
commit ed3ba96
Showing 1 changed file with 21 additions and 1 deletion.
diff --git a/tests/Paket.Tests/DependenciesFile/SaveSpecs.fs b/tests/Paket.Tests/DependenciesFile/SaveSpecs.fs
@@ -219,4 +219,24 @@ let ``should serialize config with framework restrictions``() =
     let cfg = DependenciesFile.FromCode(withFrameworkRestrictions)
 
     cfg.ToString()
-    |> shouldEqual (normalizeLineEndings withFrameworkRestrictions)
+    |> shouldEqual (normalizeLineEndings withFrameworkRestrictions)
+
+let withComments = """source https://www.nuget.org/api/v2
+
+// ignore me
+nuget FakeItEasy 1.24.0
+nuget json-ld.net 1.0.3 framework: net35, net40
+nuget Example3 !== 2.2.3 alpha beta framework: >= net40
+// ... but save me
+# and me too!
+nuget Example4 framework: net40
+nuget Example5 prerelease framework: net40
+
+http http://www.fssnip.net/raw/1M test1.fs"""
+
+[<Test>]
+let ``should serialize config with comments``() = 
+    let cfg = DependenciesFile.FromCode(withComments)
+
+    cfg.ToString()
+    |> shouldEqual (normalizeLineEndings withComments)