Cleaned up t/core_video.t

diff --git a/t/00-load.t b/t/00-load.t
index 3b49559..66b42a3 100644 (file)
--- a/t/00-load.t
+++ b/t/00-load.t
@@ -1,17 +1,19 @@
-
 use strict;
 use warnings;
-
 use Test::Most 'bail';
 
 
 
 BEGIN {
     my @modules = 
- 
 qw /
 SDL 
 SDL::Video 
+SDL::Color
+SDL::Surface
+SDL::Config
+SDL::Overlay
+SDL::Rect
 SDL::Events 
 SDL::Event 
 SDL::ActiveEvent 

diff --git a/t/core_video.t b/t/core_video.t
index 34555a1..9d0d87d 100644 (file)
--- a/t/core_video.t
+++ b/t/core_video.t
@@ -8,9 +8,7 @@ use SDL::Overlay;
 use Test::More;
 use SDL::Rect;
 
-plan ( tests => 50);
-
-use_ok( 'SDL::Video' ); 
+use SDL::Video;
 
 my @done =
        qw/ 
@@ -227,3 +225,5 @@ TODO:
 
 
 pass 'Are we still alive? Checking for segfaults';
+
+done_testing();