Fix laser targeting draw when creature offscreen

2022-03-06 22:58:05 +00:00
parent f82bd3f788
commit 1364e7c8c8
14 changed files with 108 additions and 138 deletions
@@ -171,7 +171,7 @@ jsps :: Point2 -> Float -> PSType -> Maybe Placement
 jsps p a pst = Just $ Placement (PS p a) pst Nothing $ const Nothing

 jsps0 :: PSType -> Maybe Placement
-jsps0 pst = Just $ sPS (V2 0 0) 0 pst
+jsps0 = Just . sPS (V2 0 0) 0

 sps0 :: PSType -> Placement
 sps0 = sPS (V2 0 0) 0