… | |
… | |
1145 | ]); |
1145 | ]); |
1146 | |
1146 | |
1147 | my $text = !$freq |
1147 | my $text = !$freq |
1148 | ? "audio is off" |
1148 | ? "audio is off" |
1149 | : "audio is enabled\n" |
1149 | : "audio is enabled\n" |
|
|
1150 | . "driver: " . DC::SDL_AudioDriverName . "\n" |
1150 | . "frequency (Hz): $freq\n" |
1151 | . "frequency (Hz): $freq\n" |
1151 | . "channels: $chans\n" |
1152 | . "channels: $chans\n" |
1152 | . "chunk decoders available: " . (join ", ", DC::MixChunk::decoders) . "\n" |
1153 | . "chunk decoders available: " . (join ", ", DC::MixChunk::decoders) . "\n" |
1153 | . "music decoders available: " . (join ", ", DC::MixMusic::decoders); |
1154 | . "music decoders available: " . (join ", ", DC::MixMusic::decoders); |
1154 | |
1155 | |
1155 | $AUDIO_INFO->set_text ($text); |
1156 | $AUDIO_INFO->set_text ($text); |
1156 | } |
1157 | } |
1157 | |
1158 | |
1158 | sub audio_setup { |
1159 | sub audio_setup { |