From 8e2d46c7ef27a8c3dc6aab2f43490e63ea62576b Mon Sep 17 00:00:00 2001 From: Jonas Betzendahl Date: Thu, 15 May 2014 12:06:18 +0200 Subject: [PATCH] Fixed the hell out of that snow! --- src/Map/Graphics.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Map/Graphics.hs b/src/Map/Graphics.hs index a99348b..0995741 100644 --- a/src/Map/Graphics.hs +++ b/src/Map/Graphics.hs @@ -201,8 +201,8 @@ colorLookup hs t = if inRange (bounds hs) t then c else (0.0, 0.0, 0.0) Beach -> (0.90, 0.85, 0.70) Desert -> (1.00, 0.87, 0.39) Grass -> (0.30, 0.90, 0.10) - Hill -> (0.80, 0.80, 0.80) - Mountain -> (0.50, 0.50, 0.50) + Mountain -> (0.80, 0.80, 0.80) + Hill -> (0.50, 0.50, 0.50) coordLookup :: (Int,Int) -> GLfloat -> V3 GLfloat coordLookup (x,z) y =