Remove old Prop update

src/Dodge/Prop/Update.hs

@@ -3,8 +3,6 @@ module Dodge.Prop.Update (updateProp) where
 import Control.Lens
 import Data.Foldable
 import Dodge.Data.World
-import Dodge.PrWdLsLs
---import Dodge.Prop.Moving
 import Dodge.WdP2f
 import Dodge.WorldBool
 
@@ -12,7 +10,6 @@ updateProp :: Prop -> World -> World
 updateProp pr = case _prUpdate pr of
     PropUpdateId -> id
     PropUpdates pus -> doPropUpdates pr pus
-    PropUpdateLS lsid x -> \w -> w & cWorld . lWorld . lightSources . ix lsid %~ doPrWdLsLs x pr w
     PropUpdatePosition x -> propUpdatePosition x pr
     PropUpdateWhen t x -> propUpdateIf t x PropUpdateId pr
     PropUpdateIf t x y -> propUpdateIf t x y pr