--- Screen.pm	2008/04/14 21:26:32	212
+++ Screen.pm	2009/09/03 10:24:34	216
@@ -92,10 +92,10 @@
 		-width  => $w,
 		-height => $h,
 		-depth  => 16,
-		-flags=>SDL_DOUBLEBUF | SDL_HWSURFACE | SDL_HWACCEL,
+#		-flags=>SDL_DOUBLEBUF | SDL_HWSURFACE | SDL_HWACCEL,
 	);
 	#$app->grab_input( SDL_GRAB_QUERY );
-	$app->grab_input( SDL_GRAB_OFF );
+	$app->grab_input( SDL::App::SDL_GRAB_OFF );
 	$app->title( ref($self) );
 
 	$self->app( $app );
@@ -302,11 +302,11 @@
 
 	my $type = $event->type();
 
-	exit if ($type == SDL_QUIT);
+	exit if ($type == SDL::App::SDL_QUIT);
 
 	my $k = $pending_key;
 
-	if ($type == SDL_KEYDOWN) {
+	if ($type == SDL::App::SDL_KEYDOWN) {
 		$k = $event->key_name();
 		if ( $k eq 'escape' ) {
 			$run_for = $self->cli;
@@ -319,7 +319,7 @@
 			$key_active->{$k} = 1;
 			$self->record_session('key_pressed', { $k => 1 });
 		}
-	} elsif ( $type == SDL_KEYUP ) {
+	} elsif ( $type == SDL::App::SDL_KEYUP ) {
 		my $up = $event->key_name();
 		warn "SDL_KEYUP ($type) = '$up'", $just_checking ? ' fake' : '', "\n";
 		$self->key_up( $up );