Make the Left and Right button behave the same way

This commit is contained in:
Sven van Heugten 2026-03-16 19:58:53 +01:00
parent 451d8b09f1
commit 5d8406d8ad
4 changed files with 8 additions and 11 deletions

View file

@ -37,11 +37,12 @@ let private genHumanInteraction =
let private genRemoteInteraction =
Gen.oneof
[ Gen.elements [ RemotePressedOnButton; RemotePressedOffButton; RemotePressedLeftButton ]
[ Gen.elements [ RemotePressedOnButton; RemotePressedOffButton ]
|> Gen.map BedroomControllingRemoteInteraction
Gen.elements
[ RemotePressedRightButton
[ RemotePressedLeftButton
RemotePressedRightButton
LivingRoomRemotePressedOnButton
LivingRoomRemotePressedOffButton ]
|> Gen.map LivingRoomControllingRemoteInteraction ]