Suguivy
/
roguelike
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Removed debugging pos indicator

This commit is contained in:
Ivy 2021-02-14 14:43:32 +01:00
parent 98bae7d203
commit f7aefb1a54
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Rendering.hs
View File

@ -17,6 +17,6 @@ dungeonToImg :: Dungeon -> Image
dungeonToImg = vertCat . map (string defAttr . concatMap show) . dungeonToLists dungeonToImg = vertCat . map (string defAttr . concatMap show) . dungeonToLists
playerToImg :: Player -> Image playerToImg :: Player -> Image
playerToImg p = (translateX px . translateY py $ char defAttr '@') <|> string defAttr (" (" ++ show px ++ "," ++ show py ++ ")") playerToImg p = (translateX px . translateY py $ char defAttr '@')
where px = p ^. pos . _1 where px = p ^. pos . _1
py = p ^. pos . _2 py = p ^. pos . _2