X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=test%2Fwave.pl;fp=test%2Fwave.pl;h=ec9af650bd0981dbb17c75ddce5c54d518e36f6b;hb=061fcbaab83c659da6ae8456aca15a9c45ff9aea;hp=fcb8cbb6e6ed6032653012a1625725f62a30dc1f;hpb=71dfa2cb2dfa261a15c575a98e3545e536bb56c1;p=sdlgit%2FSDL_perl.git

diff --git a/test/wave.pl b/test/wave.pl
index fcb8cbb..ec9af65 100644
--- a/test/wave.pl
+++ b/test/wave.pl
@@ -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,
 );