Cleanup

2026-03-24 09:38:32 +00:00
parent 832bebb597
commit be2f7160ba
13 changed files with 43 additions and 46 deletions
@@ -45,6 +45,8 @@ mntLSOn ::
 mntLSOn shapeF mcol ls wallp lsp@(V3 lx ly _) =
    ps0jPushPS (PutLabel "light") .
    ps0jPushPS (putShape . setCol $ shapeF wallp lsp)
+    --ps0j (PutLabel "light") .
+    --ps0j (putShape . setCol $ shapeF wallp lsp)
        . pt0 (PutLS $ ls & lsParam . lsPos .~ lsp')
  where
    lsp' = lsp -.-.- V3 x y 1