State -> NightLightStateMachine
This commit is contained in:
parent
285874777a
commit
c7c5de9e21
4 changed files with 8 additions and 8 deletions
|
|
@ -34,7 +34,7 @@ type FakeLight(light: Light) =
|
|||
brightness <- newBrightness
|
||||
|
||||
type FakeHome(now: DateTime) =
|
||||
let mutable nightLightStateMachine = State now
|
||||
let mutable nightLightStateMachine = NightLightStateMachine now
|
||||
|
||||
let assertIsOkAndGet result =
|
||||
match result with
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue