Cleanup

2022-06-10 23:10:38 +01:00
parent 6966e76206
commit ad576014fb
8 changed files with 41 additions and 37 deletions
@@ -75,9 +75,7 @@ extTrigLitPos ps f = psPtCont ps (PutTrigger (const False))
        }
    thels = lsColPosRad (V3 0.5 0 0) (V3 0 0 78) 75

-putLitButOnPosExtTrig :: Color 
-   -> PlacementSpot 
-   -> Placement
+putLitButOnPosExtTrig :: Color -> PlacementSpot -> Placement
 putLitButOnPosExtTrig col thePS = putLitButOnPosExtTrig' col thePS (const . const . const Nothing)

 putLitButOnPosExtTrig' :: Color