elm-format

src/Internal/Values/StateManager.elm

@@ -61,6 +61,7 @@ append sm2 sm1 =
     List.foldl insert sm1 (values sm2)
 
 
+
 -- {-| Remove any floating empty Mashdicts from ALL keys in the dictionary.
 -- -}
 -- cleanAll : StateManager -> StateManager

tests/Test/Values/Event.elm

@@ -19,6 +19,7 @@ fuzzer =
         Fuzz.string
         (Fuzz.maybe unsignedDataFuzzer)
 
+
 {-| Fuzzer for an event with a set state key
 -}
 fuzzerState : Fuzzer Event
@@ -26,10 +27,10 @@ fuzzerState =
     Fuzz.map2
         (\event default ->
             { event
-            | stateKey =
+                | stateKey =
-                event.stateKey
+                    event.stateKey
-                    |> Maybe.withDefault default
+                        |> Maybe.withDefault default
-                    |> Maybe.Just
+                        |> Maybe.Just
             }
         )
         fuzzer

tests/Test/Values/StateManager.elm

@@ -112,6 +112,7 @@ suite =
                         |> StateManager.member event
                         |> Expect.equal True
                 )
+
             -- , fuzz2 TestEvent.fuzzerState TestEvent.fuzzerState
             --     "singleton has no other members"
             --     (\e1 e2 ->
@@ -124,7 +125,8 @@ suite =
             --                 |> StateManager.member e2
             --                 |> Expect.equal False
             --     )
-            , fuzz TestEvent.fuzzerState "singleton has one value"
+            , fuzz TestEvent.fuzzerState
+                "singleton has one value"
                 (\event ->
                     StateManager.singleton event
                         |> StateManager.values