Call flip properly

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

diff --git a/lib/SDL/App.pm b/lib/SDL/App.pm
index c924579..afdb5a3 100644 (file)
--- a/lib/SDL/App.pm
+++ b/lib/SDL/App.pm
@@ -195,7 +195,7 @@ sub sync ($) {
        if ($SDL::App::USING_OPENGL) {
                SDL::GLSwapBuffers()
        } else {
-               $self->flip();
+               SDL::Flip($self);
        }
 }