The center button also disables sleep mode
This commit is contained in:
@@ -111,6 +111,8 @@ bedroomButtonController = proc x -> do
|
||||
Event (Enishen (OffButton _)) -> do
|
||||
sleepMode -< False
|
||||
callService (light [AreaId "makuuhuone"] Off) -< ()
|
||||
Event (Central _) -> do
|
||||
sleepMode -< False
|
||||
_ -> returnA -< ()
|
||||
where
|
||||
sleepMode = callServiceDyn (switch [EntityId "switch.adaptive_lighting_makuuhuoneen_valot_sleep_mode"] )
|
||||
|
||||
Reference in New Issue
Block a user