removing clutter

This commit is contained in:
nek0 2018-06-25 23:45:53 +02:00
parent 7a4248671e
commit 5e0c634b61
2 changed files with 4 additions and 6 deletions

View file

@ -107,7 +107,6 @@ loadMapFork ud future progress = do
Prelude.map Prelude.map
(\a -> if a == Just ImgEmpty then Nothing else a) (\a -> if a == Just ImgEmpty then Nothing else a)
(M.toList inter) (M.toList inter)
, initCoords = (0, 500)
, reachPoints = rps , reachPoints = rps
}) })

View file

@ -20,7 +20,6 @@ data StateData
} }
| MenuData | MenuData
{ mapMat :: Matrix TileState { mapMat :: Matrix TileState
, initCoords :: (Int, Int)
, imgMat :: Matrix (Maybe ImgId) , imgMat :: Matrix (Maybe ImgId)
, reachPoints :: [ReachPoint] , reachPoints :: [ReachPoint]
} }