Cleanup

2023-05-20 15:06:05 +01:00
parent 6c71e1d5bb
commit f2183e9954
25 changed files with 69 additions and 86 deletions
@@ -65,7 +65,7 @@ fixedSizePicClampArrow ::
    World ->
    Picture
 fixedSizePicClampArrow xbord ybord pic p cfig w =
-    pictures
+    fold
        [ setLayer DebugLayer . translate x y . scale theScale theScale $ pic
        , setLayer DebugLayer . color white . setDepth 20 $ arrowPic
        ]