Split out SDL_Color into its own C-level class

[sdlgit/SDL_perl.git] / lib / SDL / Surface.pm

diff --git a/lib/SDL/Surface.pm b/lib/SDL/Surface.pm
index 5b2b316..35796c9 100644 (file)
--- a/lib/SDL/Surface.pm
+++ b/lib/SDL/Surface.pm
@@ -166,7 +166,7 @@ sub fill {
        if ($_[1] == 0 ) {
                SDL::FillRect(${$_[0]},0,${$_[2]});
        } else {
-               SDL::FillRect(${$_[0]},$_[1],${$_[2]});
+               SDL::FillRect(${$_[0]},$_[1],$_[2]);
        }
 }