From 04fbe88386b9ebe9d655b0270c9453a885b05d1c Mon Sep 17 00:00:00 2001
From: ennewalker <ennewalker@c06c8d41-db1a-0410-9941-cceddc491573>
Date: Thu, 24 Jul 2008 01:05:13 +0000
Subject: Fixing Tiles mouse performance issue found by Johanna.  Fixing
 various Tiles crashes (oops).

git-svn-id: https://crawl-ref.svn.sourceforge.net/svnroot/crawl-ref/trunk@6656 c06c8d41-db1a-0410-9941-cceddc491573
---
 crawl-ref/source/tilesdl.cc | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

(limited to 'crawl-ref/source/tilesdl.cc')

diff --git a/crawl-ref/source/tilesdl.cc b/crawl-ref/source/tilesdl.cc
index fda5f26320..df3f7b7d34 100644
--- a/crawl-ref/source/tilesdl.cc
+++ b/crawl-ref/source/tilesdl.cc
@@ -502,6 +502,9 @@ int TilesFramework::getch_ck()
     SDL_Event event;
 
     int key = 0;
+
+    const unsigned int ticks_per_redraw = 16; // 60 FPS = 16.6 ms/frame
+    unsigned int last_redraw_tick = 0;
     
     while (!key)
     {
@@ -603,7 +606,11 @@ int TilesFramework::getch_ck()
             m_tooltip.clear();
         }
 
-        redraw();
+        if (ticks - last_redraw_tick > ticks_per_redraw)
+        {
+            redraw();
+            last_redraw_tick = ticks;
+        }
     }
 
     return key;
-- 
cgit v1.2.3-54-g00ecf