From 231ebd2fbab8d7e936cb3c038712ade82b837a33 Mon Sep 17 00:00:00 2001
From: nek0 <nek0@chelnok.de>
Date: Fri, 16 Nov 2018 12:38:40 +0100
Subject: [PATCH] wrong!

---
 src/MainGame/WorldMap.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/MainGame/WorldMap.hs b/src/MainGame/WorldMap.hs
index b4cf6d3..d73c5b3 100644
--- a/src/MainGame/WorldMap.hs
+++ b/src/MainGame/WorldMap.hs
@@ -537,7 +537,7 @@ drawTile ud ctx posanims pr pc row col img =
     ((realToFrac x :: Double) < 1280 &&
     (realToFrac (y - (74 - (realToFrac tileHeight :: CFloat))) :: Double) < 720)) $
       do
-        let (bef, beh) = L.partition delimiter (reverse sorted)
+        let (bef, beh) = L.partition delimiter sorted
         save ctx
         mapM_ drawAnim beh
         maybe (return ()) (draw ud x (y - 42) 64 74 fact)