Cleanup: remove uniforms from shader datatype

src/Preload/Render.hs

@@ -111,13 +111,10 @@ preloadRender = do
     -- lighting shaders
     lightingWallShadShad <-
         makeShaderUsingVAO "lighting/wallShadow" [vert, geom, frag] EPoints wpVAO
-            >>= addUniforms ["lightPos","rad"]
     lightingCapShad <-
         makeShaderUsingVAO "lighting/cap" [vert, geom] ETriangles shPosVAO
-            >>= addUniforms ["lightPos"]
     lightingLineShadowShad <-
         makeShaderUsingVAO "lighting/lineShadow" [vert, geom] ELinesAdjacency shEdgeVAO
-            >>= addUniforms ["lightPos", "radiusUniform"]
 
     shadowedgeshader <-
         makeShaderUsingVAO "shadow/edge" [vert, geom] ELinesAdjacency shEdgeVAO
@@ -158,7 +155,6 @@ preloadRender = do
     grayscaleShad <- makeShaderUsingVAO "texture/grayscale" [vert, frag] ETriangleStrip fsshadvao
     lightingTextureShad <-
         makeShaderUsingVAO "lighting/texture" [vert, frag] ETriangleStrip fsshadvao
-            >>= addUniforms ["lightPos", "lumRad"]
     barrelShad <- makeShader "texture/barrel" [vert, geom, frag] [2, 2, 2, 1] EPoints
     -- blank wallShader
     wallBlankShad <- makeShaderUsingVAO "wall/blank" [vert, geom, frag] EPoints wpColVAO