Remove SDL::Init, add comment about frequency
[sdlgit/SDL_perl.git] / test / wave.pl
index fcb8cbb..ec9af65 100644 (file)
@@ -8,10 +8,9 @@ use SDL;
 use SDL::Mixer;
 use SDL::Sound;
 
-SDL::Init(SDL_INIT_AUDIO);
-
 my $filename = shift || 'data/sample.wav';
 
+# we want a frequency that is higher than the default
 my $mixer = SDL::Mixer->new(
     -frequency => 44100,
 );