projects
/
sdlgit/SDL_perl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
windows does't know shebang.
[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";