Cleanup

src/Dodge/Render/Lights.hs

@@ -11,7 +11,7 @@ import Geometry
 import qualified IntMapHelp as IM
 import Control.Lens
 
-lightsToRender :: Configuration -> Camera -> LWorld -> [(Point3, Float, Point3)]
+lightsToRender :: Config -> Camera -> LWorld -> [(Point3, Float, Point3)]
 {-# INLINE lightsToRender #-}
 lightsToRender cfig campos w =  take (fromEnum $ cfig ^. graphics_num_shadow_casters) $
     sortOn (\(_,x,_) -> negate x) $