From 555a64db087e3f46b4849fea685f5c2687b2a698 Mon Sep 17 00:00:00 2001 From: Sven van Heugten Date: Tue, 6 Jan 2026 10:22:20 +0100 Subject: [PATCH] Improve variable name --- NightLight.Core.Tests/NightLightTests.fs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/NightLight.Core.Tests/NightLightTests.fs b/NightLight.Core.Tests/NightLightTests.fs index e2c9606..d0889b6 100644 --- a/NightLight.Core.Tests/NightLightTests.fs +++ b/NightLight.Core.Tests/NightLightTests.fs @@ -103,14 +103,14 @@ type NightLightTests() = let ``After a new day starts, all lights that have power should be on as long as the 'Off' button isn't pressed`` () = - let genInitialTransitionToDay = + let genInitialInteractionsListThatEndsWithTransitionToDay = concatGens [ Gen.bind genInteractionListThatStartsWithTimeChangedAndEndsWith genTimeChangedToNight genInteractionListExcept isTimeChangedToDay Gen.map List.singleton genTimeChangedToDay ] concatGens - [ genInitialTransitionToDay + [ genInitialInteractionsListThatEndsWithTransitionToDay genInteractionListExcept ((=) (HumanInteraction RemotePressedOffButton)) ] |> Arb.fromGen |> Prop.forAll