Remove temporary light sources as separate entity

2024-11-26 13:12:55 +00:00
parent e93a804559
commit cc302a6846
17 changed files with 243 additions and 241 deletions
@@ -16,11 +16,11 @@ lightsToRender :: Configuration -> Camera -> LWorld -> [(Point3, Float, Point3)]
 lightsToRender cfig campos w =  take (fromEnum $ cfig ^. graphics_num_shadow_casters) $
    sortOn (\(_,x,_) -> negate x) $
    mapMaybe getLS (IM.elems $ w ^. lightSources)
-        ++ mapMaybe getTLS (w ^. tempLightSources)
+--        ++ mapMaybe getTLS (w ^. tempLightSources)
        ++ mapMaybe getlsparam (w ^. lights)
  where
    getLS = getlsparam . _lsParam
-    getTLS = getlsparam . _tlsParam
+--    getTLS = getlsparam . _tlsParam
    cbox = campos ^. camBoundBox
    cpos = campos ^. camCenter
    getlsparam ls