diff -up SDL_Perl-v2.2.6/t/mixerpm.t~ SDL_Perl-v2.2.6/t/mixerpm.t
--- SDL_Perl-v2.2.6/t/mixerpm.t~	2009-11-07 21:47:35.000000000 +0100
+++ SDL_Perl-v2.2.6/t/mixerpm.t	2011-02-22 09:40:21.988394662 +0100
@@ -57,7 +57,7 @@ if( check_fail_mixer() )
 
 
 if ( SDL::Config->has('SDL_mixer') ) {
-	plan ( tests => 3 );
+	plan ( tests => 2 );
 }			
 else {
 	plan ( skip_all => 'SDL_mixer support not compiled' );
@@ -101,9 +101,3 @@ can_ok ('SDL::Mixer', qw/
 	playing
 	playing_music
 	/);
-
-
-# these are exported by default, so main:: should know them:
-my $mixer = SDL::Mixer->new();
-isa_ok($mixer, 'SDL::Mixer', 'Checking if mixer can be build');
-