diff --git a/src/Picture/Render.hs b/src/Picture/Render.hs index 3ab3281e9..fe0c51b8d 100644 --- a/src/Picture/Render.hs +++ b/src/Picture/Render.hs @@ -97,9 +97,9 @@ renderPicture' pdata rot zoom (tranx,trany) (winx,winy) wallPoints lightPoints -- blendFunc $= (Zero,One) drawShader (_wallShadowShader pdata) nWalls --- cullFace $= Just Front --- stencilOp $= (OpKeep,OpKeep,OpDecr) --- drawShader (_wallShadowShader pdata) nWalls + cullFace $= Just Front + stencilOp $= (OpKeep,OpKeep,OpDecr) + drawShader (_wallShadowShader pdata) nWalls cullFace $= Nothing