removed "installing sdl" as it's already there

[sdlgit/SDL_perl.git] / test / testcolor.pl

diff --git a/test/testcolor.pl b/test/testcolor.pl
index 9865b62..e341a85 100644 (file)
--- a/test/testcolor.pl
+++ b/test/testcolor.pl
@@ -25,8 +25,7 @@ my %colors = (
 
 
 $x = 0; $y = 0;
-$rect = new SDL::Rect -x => $x, -y => $y, 
-       -w => $app->width / scalar(keys %colors), -h => $app->height();
+$rect = SDL::Rect->new( $x,  $y, $app->width / scalar(keys %colors), $app->height());
 
 print "Sorted colors:\n";