X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Ftimerpm.t;h=8f0a3370710c0537a8c74b856ae84e2ddb97b187;hb=d5a2f5aca8aa348105b7fbcf0664594c9aa35d8b;hp=51d81d5b0909b627db2d068aef442b88b76bea02;hpb=15a6855a1873836b12bf4f67f0cb600bd4209b6f;p=sdlgit%2FSDL_perl.git

diff --git a/t/timerpm.t b/t/timerpm.t
index 51d81d5..8f0a337 100644
--- a/t/timerpm.t
+++ b/t/timerpm.t
@@ -45,7 +45,7 @@ sub check_fail_timer
 	my $ret = 0;
 	eval
 	{
-      		$ret = SDL::Init(SDL_INIT_TIMER);
+      		$ret = SDL::init(SDL_INIT_TIMER);
 	};
 	return 1 if ($@ or $ret == -1);
 	return 0;
@@ -72,5 +72,5 @@ my $timer = new SDL::Timer
 
 isa_ok($timer, 'SDL::Timer');
 
-SDL::Delay(100);
+SDL::delay(100);
 is ($fired, 1,'timer fired once');