--- Screen.pm	2007/08/05 15:24:22	152
+++ Screen.pm	2007/08/05 16:58:01	155
@@ -49,7 +49,7 @@
 	);
 	#$app->grab_input( SDL_GRAB_QUERY );
 	$app->grab_input( SDL_GRAB_OFF );
-	$app->title( ref($self) . ' ' . $self::VERSION );
+	$app->title( ref($self) );
 
 	$self->app( $app );
 
@@ -238,6 +238,7 @@
 	my $event = $self->event || confess "no event?";
 
 	if ( ! $event->poll ) {
+		return $pending_key unless $self->can('session_event');
 		if ( my $h = $self->session_event('key_pressed') ) {
 			my ( $key, $state ) = %$h;
 			if ( $state ) {