From 3618430364b04d4283a8e01590cae5476255fc30 Mon Sep 17 00:00:00 2001
From: Andrew Cady <d@jerkface.net>
Date: Thu, 3 Dec 2015 05:35:10 -0500
Subject: store midi event history in a simple list

---
 axis.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'axis.hs')

diff --git a/axis.hs b/axis.hs
index ba4ccdc..c784865 100644
--- a/axis.hs
+++ b/axis.hs
@@ -396,7 +396,7 @@ textBand videoSurface videoClipRect (SDL.Rect _ y _ h) font text = do
     return ()
   return ()
 
---parseSDLEvents :: Set.Set SDL.SDLKey -> Set.Set SDL.Event -> IO (Set.Set SDL.Keysym.SDLKey, Set.Set SDL.Event)
+parseSDLEvents :: Set.Set SDLKey -> (Int, Int) -> IO (Set.Set SDLKey, (Int, Int))
 parseSDLEvents keysDown others = do
   event <- SDL.pollEvent
   case event of
-- 
cgit v1.2.3