Remove SDL::Init, add comment about frequency
Leon Brocard [Fri, 9 Oct 2009 15:13:01 +0000 (16:13 +0100)]
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,
 );