X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcore_overlay.t;h=f385ad213a0ad260f84d1892b3b2ae2239dea516;hb=HEAD;hp=2b0660b320d53419d1bc8535682b75b289aa54bb;hpb=9346cc6bf06dec0a3c4d215f20f67df880027b34;p=sdlgit%2FSDL_perl.git

diff --git a/t/core_overlay.t b/t/core_overlay.t
index 2b0660b..f385ad2 100644
--- a/t/core_overlay.t
+++ b/t/core_overlay.t
@@ -6,13 +6,18 @@ use SDL;
 
 use_ok('SDL::Overlay');
 
-SDL::Init(SDL_INIT_VIDEO);
+SDL::init(SDL_INIT_VIDEO);
 
-my $display = SDL::SetVideoMode(640,480,32,0);
+my $display = SDL::SetVideoMode(640,480,32, SDL_SWSURFACE );
 
-my $overlay = SDL::Overlay->new( 0, 0, 0, $display);
+my $overlay = SDL::Overlay->new( 100, 100, SDL_YV12_OVERLAY, $display);
 
 isa_ok( $overlay, 'SDL::Overlay');
 
+$overlay = undef;
+
+$display = undef;
+
+