# HG changeset patch
# User Michael Pavone <pavone@retrodev.com>
# Date 1428546592 25200
# Node ID 6bbf12c203f7fb66ac4aefc2b18b85c82fdf6ac8
# Parent  7de6ac24eb64a4437178603f97f58b84b3701fd6
Actually call SDL_WaitEvent rather than SDL_PollEvent in the waitEvent method

diff -r 7de6ac24eb64 -r 6bbf12c203f7 modules/sdl.tp
--- a/modules/sdl.tp	Wed Apr 08 19:29:22 2015 -0700
+++ b/modules/sdl.tp	Wed Apr 08 19:29:52 2015 -0700
@@ -908,7 +908,7 @@
 		}
 		
 		waitEvent <- {
-			_helper pollEvent: :typ tstamp eventPtr {
+			_helper waitEvent: :typ tstamp eventPtr {
 				_eventConstructors ifget: typ :handler {
 					handler: typ tstamp eventPtr
 				} else: {