diff --git a/SoccerFun.cabal b/SoccerFun.cabal
--- a/SoccerFun.cabal
+++ b/SoccerFun.cabal
@@ -1,5 +1,5 @@
 Name:           SoccerFun
-Version:        0.3.5
+Version:        0.3.6
 Copyright:      (c) 2010, Jan Rochel
 License:        BSD3
 License-File:   LICENSE
diff --git a/SoccerFun/UI/GL.hs b/SoccerFun/UI/GL.hs
--- a/SoccerFun/UI/GL.hs
+++ b/SoccerFun/UI/GL.hs
@@ -60,6 +60,7 @@
 
 	inputCallback ∷ GL.Key → GL.KeyState → GL.Modifiers → GL.Position → IO ()
 	inputCallback (GL.Char 'q') _ _ _ = exitSuccess
+	inputCallback _ _ _ _ = return ()
 
 	gameLoop = do
 		((refereeActions,playerWithActions),match') ← liftM stepMatch $ readIORef match