Safer default
This commit is contained in:
Notes:
Mats Rauhala
2026-10-02 12:08:49 +03:00
Hello Again?
@@ -58,7 +58,7 @@ newtype Snapshot = Snapshot { getSnapshot :: Map T.Text LightObservation }
|
||||
deriving Serialize via (Map T.Text LightObservation)
|
||||
|
||||
lightLevel :: HASS (Event Value) Int
|
||||
lightLevel = entityRead "sensor.presence_sensor_bedroom_light_level" >>> AFRP.hold 15
|
||||
lightLevel = entityRead "sensor.presence_sensor_bedroom_light_level" >>> AFRP.hold 1
|
||||
|
||||
bedroomPresenceController :: HASS (Event Value) ()
|
||||
bedroomPresenceController = proc x -> do
|
||||
|
||||
Reference in New Issue
Block a user