From 3eb66a2125caefe61729c0999c8813c3847957cd Mon Sep 17 00:00:00 2001
From: "Juan J. Martinez" <jjm@usebox.net>
Date: Sun, 16 Apr 2023 11:20:19 +0100
Subject: Removed unnecessary $

---
 src/Game/Toaster.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Game/Toaster.hs b/src/Game/Toaster.hs
index e3fbc69..75907eb 100644
--- a/src/Game/Toaster.hs
+++ b/src/Game/Toaster.hs
@@ -44,9 +44,9 @@ update t = case t.current of
   where
     updateToast :: Int -> Toast -> Maybe Toast
     updateToast height toast
-      | toast.y > height && toast.delay > 0 = Just $ toast {y = toast.y - 1}
-      | toast.delay > 0 = Just $ toast {delay = toast.delay - 1}
-      | toast.y < t.gameHeight = Just $ toast {y = toast.y + 1}
+      | toast.y > height && toast.delay > 0 = Just toast {y = toast.y - 1}
+      | toast.delay > 0 = Just toast {delay = toast.delay - 1}
+      | toast.y < t.gameHeight = Just toast {y = toast.y + 1}
       | otherwise = Nothing
 
 render :: SDL.Renderer -> Toaster -> IO ()
-- 
cgit v1.2.3