wrong!
This commit is contained in:
parent
feb069f4ce
commit
231ebd2fba
1 changed files with 1 additions and 1 deletions
|
@ -537,7 +537,7 @@ drawTile ud ctx posanims pr pc row col img =
|
||||||
((realToFrac x :: Double) < 1280 &&
|
((realToFrac x :: Double) < 1280 &&
|
||||||
(realToFrac (y - (74 - (realToFrac tileHeight :: CFloat))) :: Double) < 720)) $
|
(realToFrac (y - (74 - (realToFrac tileHeight :: CFloat))) :: Double) < 720)) $
|
||||||
do
|
do
|
||||||
let (bef, beh) = L.partition delimiter (reverse sorted)
|
let (bef, beh) = L.partition delimiter sorted
|
||||||
save ctx
|
save ctx
|
||||||
mapM_ drawAnim beh
|
mapM_ drawAnim beh
|
||||||
maybe (return ()) (draw ud x (y - 42) 64 74 fact)
|
maybe (return ()) (draw ud x (y - 42) 64 74 fact)
|
||||||
|
|
Loading…
Add table
Reference in a new issue