From 86720a73627350d62a3a2e881016a63180e47f5b Mon Sep 17 00:00:00 2001 From: Travis Montoya Date: Sat, 2 Nov 2024 20:11:42 -0600 Subject: [PATCH] describing test more accurately --- test/DecimalTimeSpec.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/DecimalTimeSpec.hs b/test/DecimalTimeSpec.hs index ecb63fd..49c5687 100644 --- a/test/DecimalTimeSpec.hs +++ b/test/DecimalTimeSpec.hs @@ -75,8 +75,8 @@ spec = do Right s -> s ^. extendedFlag == extended Left _ -> True - describe "updateCurrentDateWithZonedTime returns proper date" $ do - it "returns the date from the ZonedTime" $ property $ \tod zt -> + describe "updateCurrentDateWithZonedTime" $ do + it "verifies state _currentDate is set to LocalTime" $ property $ \tod zt -> let state = makeTestState tod localTime = zonedTimeToLocalTime zt updatedState = updateCurrentDateWithZonedTime zt state