Cleanup

2023-05-20 15:06:05 +01:00
parent 6c71e1d5bb
commit f2183e9954
25 changed files with 69 additions and 86 deletions
@@ -6,9 +6,7 @@ import Picture
 drawLaser :: Laser -> Picture
 drawLaser pt =
    setLayer BloomNoZWrite $
-        pictures
-            [ setDepth 19.5 . color (brightX 10 1 col) $ thickLine 3 ps
-            ]
+             setDepth 19.5 . color (brightX 10 1 col) $ thickLine 3 ps
  where
    col = _lzColor pt
    ps = _lzPoints pt