removing clutter
This commit is contained in:
parent
7a4248671e
commit
5e0c634b61
2 changed files with 4 additions and 6 deletions
|
@ -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
|
||||||
})
|
})
|
||||||
|
|
||||||
|
|
|
@ -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]
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue