MasseR/home-assistant-controller
1
0
Fork 0
Code Issues 2 Pull Requests Actions Packages Projects Releases Wiki Activity

Safer default

Browse Source
This commit is contained in:
MasseR
2026-10-01 21:57:47 +03:00
parent 38d575d716
commit 5416e9b708
Notes: Mats Rauhala 2026-10-02 12:08:49 +03:00 
Hello

Again?
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/HomeAssistant/Controller/Bedroom.hs
+1 -1
View File
@@ -58,7 +58,7 @@ newtype Snapshot = Snapshot { getSnapshot :: Map T.Text LightObservation }
deriving Serialize via (Map T.Text LightObservation) deriving Serialize via (Map T.Text LightObservation)
lightLevel :: HASS (Event Value) Int 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 :: HASS (Event Value) ()
bedroomPresenceController = proc x -> do bedroomPresenceController = proc x -> do