Added last two objects (Overlay and VideoInfo) XS files for Video

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

diff --git a/test/testgfxprim.pl b/test/testgfxprim.pl
index e6f32d9..0d59244 100644 (file)
--- a/test/testgfxprim.pl
+++ b/test/testgfxprim.pl
@@ -202,10 +202,10 @@ sub game_loop
                $surfMidWidth*.25,$surfMidHeight*.10,255,255,0,255);
 
        # pie slices
-       SDL::GFXFilledpieRGBA($surf,$surfMidWidth,$surfMidHeight, $surfMidWidth*.1,
+       SDL::GFXFilledPieRGBA($surf,$surfMidWidth,$surfMidHeight, $surfMidWidth*.1,
                0,90,0,0,255,255);
 
-       SDL::GFXFilledpieRGBA($surf,$surfMidWidth,$surfMidHeight, $surfMidWidth*.1,
+       SDL::GFXFilledPieRGBA($surf,$surfMidWidth,$surfMidHeight, $surfMidWidth*.1,
                180,270,0,0,255,255);
 
        # polygons