Introduce a global remoteControlledLights value
This commit is contained in:
parent
2950b21488
commit
0d21e81b82
3 changed files with 8 additions and 14 deletions
|
|
@ -73,4 +73,7 @@ let lights =
|
|||
Bulb = IkeaBulb
|
||||
ControlledWithRemote = RemoteLeft } ]
|
||||
|
||||
let remoteControlledLights =
|
||||
lights |> Seq.filter (not << _.ControlledWithRemote.IsNonRemote)
|
||||
|
||||
let remoteControlFriendlyName = DeviceFriendlyName "Fjärrkontroll"
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue