Work on textures and lighting

src/Shader/Data.hs

@@ -16,7 +16,6 @@ module Shader.Data (
     shaderUINT,
     shaderPrimitive,
     shaderVAO,
-    shaderTextures,
     textureObject,
     vboName,
     vboPtr,
@@ -51,7 +50,6 @@ data Shader = Shader
     { _shaderUINT :: GLuint -- should be shaderID
     , _shaderPrimitive :: PrimitiveMode
     , _shaderVAO :: VAO
-    , _shaderTextures :: [TO]
     }
 
 newtype FBO = FBO {_unFBO :: GLuint}