From 7778fb0403bbc1e15ce088d8540b69b9cbd55ade Mon Sep 17 00:00:00 2001
From: justin <justin.g.kruger@gmail.com>
Date: Sun, 26 Jun 2022 14:35:54 +0100
Subject: [PATCH] Commit before removing single foregroundShape

---
 src/Dodge/Data/ForegroundShape.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Dodge/Data/ForegroundShape.hs b/src/Dodge/Data/ForegroundShape.hs
index c64e538bd..74c2527eb 100644
--- a/src/Dodge/Data/ForegroundShape.hs
+++ b/src/Dodge/Data/ForegroundShape.hs
@@ -9,6 +9,7 @@ data ForegroundShape = ForegroundShape
     { _fsID :: Int
     , _fsPos :: Point2
     , _fsDir :: Float
+    , _fsRad :: Float
     , _fsSPic :: SPic
     }
   deriving (Eq,Show,Ord)