From 696269c1b5f3b743695e64e95b9ca9f68e7471ff Mon Sep 17 00:00:00 2001
From: tpajenka <tpajenka@foo>
Date: Fri, 16 May 2014 00:39:29 +0200
Subject: [PATCH] non-ASCI characters on output (e.g. in compiler messages) may
 break certain shells preventing compiling

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

diff --git a/src/Main.hs b/src/Main.hs
index 50dced5..3f5c5bc 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -232,7 +232,7 @@ run = do
         let 	double = fromRational.toRational :: (Real a) => a -> Double
 		targetFramerate = 60.0
 		targetFrametime = 1.0/targetFramerate
-		targetFrametimeμs = targetFrametime * 1000000.0
+		--targetFrametimeμs = targetFrametime * 1000000.0
         now <- getCurrentTime
         let diff  = diffUTCTime now (state ^. io.clock) -- get time-diffs
             title = unwords ["Pioneers @ ",show ((round . double $ 1.0/diff)::Int),"fps"]