diff --git a/src/HomeAssistant/Controller/Bedroom.hs b/src/HomeAssistant/Controller/Bedroom.hs
index e447411..7437484 100644
--- a/src/HomeAssistant/Controller/Bedroom.hs
+++ b/src/HomeAssistant/Controller/Bedroom.hs
@@ -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