Linting, refactor random angle walk for flamer

src/Picture/Render.hs

@@ -140,7 +140,12 @@ createLightMap pdata resDiv wallPoints lightPoints
     bindFramebuffer Framebuffer $= defaultFramebufferObject
     colorMask $= Color4 Disabled Disabled Disabled Enabled
     bindShaderBuffers [_fullscreenShader pdata] [4]
+-- by upscaling the shadowmap texture and using Linear' magnification
+-- interpolation, we get a poor mans blur
     textureBinding Texture2D $= Just (_fboTexture pdata)
+    textureFilter Texture2D $= ((Linear',Just Linear') , Linear')
+-- not sure about the perforamnce implications ^^^
+    generateMipmap' Texture2D
     drawShader (_fullscreenShader pdata) 4
     colorMask $= Color4 Enabled Enabled Enabled Enabled
     blend $= Enabled