make it slightly slower so that we can see if it is working

diff --git a/t/intergation1.t b/t/intergation1.t
index 68a6f92..1947864 100644 (file)
--- a/t/intergation1.t
+++ b/t/intergation1.t
@@ -87,8 +87,9 @@ my $app  = SDL::App->new(-title => "Test", -width => 640, -height => 480, -init
        $app->fill_rect($rect, $blue);
        $app->fill_rect($grect, $col);
 
-        SDL::Surface::update_rect($app, 0, 0, 0, 0);
+        SDL::Surface::update_rect($app, 0, 0, 640, 480);
+        SDL::Delay(10);
        }
 
-         sleep(1);
+         SDL::Delay(100);