diff --git a/src/Dodge/Data.hs b/src/Dodge/Data.hs index 8915a9846..6aa6b5321 100644 --- a/src/Dodge/Data.hs +++ b/src/Dodge/Data.hs @@ -384,7 +384,7 @@ data Projectile { _pjPos :: Point2 , _pjStartPos :: Point2 , _pjVel :: Point2 - , _pjDraw :: Picture + , _pjPict :: Picture , _pjID :: Int , _pjUpdate :: World -> World } @@ -397,12 +397,6 @@ data Projectile , _pjUpdate :: World -> World , _pjPayload :: Point2-> World -> World } - | BoostShockwave - { _pjID :: Int - , _pjPict :: Picture - , _pjUpdate :: World -> World - , _pjPoints :: [Point2] - } data Either3 a b c = E3x1 a | E3x2 b | E3x3 c data Wall = Wall