--- M6502/Screen.pm	2007/07/30 17:32:41	29
+++ M6502/Screen.pm	2007/07/30 17:56:13	30
@@ -12,7 +12,7 @@
 use base qw(Class::Accessor);
 __PACKAGE__->mk_accessors(qw(debug scale show_mem run_for mem_dump trace));
 
-=head2 init
+=head2 open_screen
 
 Open simulated screen
 
@@ -20,7 +20,7 @@
 
 our $app;
 
-sub init {
+sub open_screen {
 	my $self = shift;
 	$app = SDL::App->new(
 		-width  => 256 * $self->scale + ( $self->show_mem ? 256 : 0 ),