Rename some stuff

2026-01-17 15:57:03 +01:00 · 2026-01-17 15:57:03 +01:00 · 9fa7037f0e
commit 9fa7037f0e
parent e422f03217
1 changed files with 6 additions and 7 deletions
--- a/NightLight.Core/NightLightStateMachine.fs
+++ b/NightLight.Core/NightLightStateMachine.fs
@ -104,15 +104,14 @@ type NightLightStateMachine private (maybeState: NightLightState option) =
                          State = newState })
                    |> Map.ofSeq

-                let newState =
-                    NightLightStateMachine(
-                        Some
-                        <| { Time = newTime
-                             LightToState = newLightToState }
-                    )
+                let newNightLightStateMachine =
+                    { Time = newTime
+                      LightToState = newLightToState }
+                    |> Some
+                    |> NightLightStateMachine

                return
-                    newState,
+                    newNightLightStateMachine,
                    if partOfDayChanged then
                        lights
                        |> Seq.collect (fun light -> generateZigbeeCommandsToFixLight newLightToState[light] light)