diff --git a/src/Dodge/Data/LWorld.hs b/src/Dodge/Data/LWorld.hs index 825207ae9..744e6594f 100644 --- a/src/Dodge/Data/LWorld.hs +++ b/src/Dodge/Data/LWorld.hs @@ -135,6 +135,7 @@ data LWorld = LWorld , _corpses :: IM.IntMap Corpse , _lightSources :: IM.IntMap LightSource , _tempLightSources :: [TempLightSource] + , _lights :: [LSParam] , _seenLocations :: IM.IntMap (WdP2, String) , _selLocation :: Int , _distortions :: [Distortion] diff --git a/src/Dodge/Default/World.hs b/src/Dodge/Default/World.hs index dd3e3b4d8..ef39deaf4 100644 --- a/src/Dodge/Default/World.hs +++ b/src/Dodge/Default/World.hs @@ -136,6 +136,7 @@ defaultLWorld = , _corpses = IM.empty , _lightSources = IM.empty , _tempLightSources = [] + , _lights = mempty , _seenLocations = IM.fromList [ (0, (WdYouPos, "CURRENT POSITION"))