Further fixes

fsprojects · Jul 24, 2021 · b7613ed · b7613ed
1 parent 51f80d8
commit b7613ed
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 5 deletions.
diff --git a/src/Fantomas.Tests/UtilsTests.fs b/src/Fantomas.Tests/UtilsTests.fs
@@ -117,7 +117,7 @@ SetupTesting.generateSetupScript __SOURCE_DIRECTORY__
 
 module List =
     [<Test>]
-    let ``When input is empty`` () =
+    let ``when input is empty`` () =
         let property (p: bool) : bool =
             let before, after = List.partitionWhile (fun _ _ -> p) []
             before = [] && after = []
@@ -126,7 +126,7 @@ module List =
         Check.QuickThrowOnFailure(property false)
 
     [<Test>]
-    let ``When predicate always returns false`` () =
+    let ``when predicate always returns false`` () =
         let property (xs: int list) : bool =
             let before, after =
                 List.partitionWhile (fun _ _ -> false) xs
@@ -136,7 +136,7 @@ module List =
         Check.QuickThrowOnFailure property
 
     [<Test>]
-    let ``When predicate always returns true`` () =
+    let ``when predicate always returns true`` () =
         let property (xs: int list) : bool =
             let before, after =
                 List.partitionWhile (fun _ _ -> true) xs
@@ -146,7 +146,7 @@ module List =
         Check.QuickThrowOnFailure property
 
     [<Test>]
-    let ``When predicate returns true until certain index`` () =
+    let ``when predicate returns true until certain index`` () =
         let property (xs: int list, i: int) : bool =
             let before, after =
                 List.partitionWhile (fun index _ -> i <> index) xs

diff --git a/src/Fantomas/Utils.fs b/src/Fantomas/Utils.fs
@@ -163,7 +163,6 @@ module List =
 
         go 0 [] xs
 
-
 module Map =
     let tryFindOrDefault (defaultValue: 'g) (key: 't) (map: Map<'t, 'g>) =
         match Map.tryFind key map with