summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-01-14 10:26:18 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-01-14 10:26:18 +0000
commit8ddf0bb1d5aa49f51563ecae3b07c6ae61e28160 (patch)
tree9b302e4a5777f1198aab67a20c05efd1b3835a48
parenta2da59191245632276962ff708668ae8a0aac943 (diff)
downloaddrakx-backup-do-not-use-8ddf0bb1d5aa49f51563ecae3b07c6ae61e28160.tar
drakx-backup-do-not-use-8ddf0bb1d5aa49f51563ecae3b07c6ae61e28160.tar.gz
drakx-backup-do-not-use-8ddf0bb1d5aa49f51563ecae3b07c6ae61e28160.tar.bz2
drakx-backup-do-not-use-8ddf0bb1d5aa49f51563ecae3b07c6ae61e28160.tar.xz
drakx-backup-do-not-use-8ddf0bb1d5aa49f51563ecae3b07c6ae61e28160.zip
add a "trouble shooting" window
-rw-r--r--perl-install/harddrake/sound.pm42
1 files changed, 38 insertions, 4 deletions
diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm
index fa31c6a9a..766a8a6e2 100644
--- a/perl-install/harddrake/sound.pm
+++ b/perl-install/harddrake/sound.pm
@@ -175,10 +175,14 @@ sub switch {
$device->{description}) .
N("\n\nYour card currently use the %s\"%s\" driver (default driver for your card is \"%s\")", ($driver =~ /^snd-/ ? "ALSA " : "OSS "), $driver, $device->{driver}),
[
- { label => N("Driver:"), val => \$new_driver, list => $alternative, default => $new_driver, sort =>1, format => sub {
- my %des = modules::category2modules_and_description('multimedia/sound');
- "$_[0] (" . $des{$_[0]} . ')'
- }, allow_empty_list => 1 },
+ {
+ label => N("Driver:"), val => \$new_driver, list => $alternative, default => $new_driver, sort =>1,
+ format => sub {
+ my %des = modules::category2modules_and_description('multimedia/sound');
+ "$_[0] (" . $des{$_[0]} . ')';
+ },
+ allow_empty_list => 1,
+ },
{
val => N("Help"), disabled => sub {},
clicked => sub {
@@ -194,6 +198,10 @@ To use alsa, one can either use:
- the new ALSA api that provides many enhanced features but requires using the ALSA library.
"))
}
+ },
+ {
+ val => N("Trouble shooting"), disabled => sub {},
+ clicked => sub { &trouble($in) }
}
]))
{
@@ -222,4 +230,30 @@ sub config {
switch($in, $device);
}
+
+sub trouble {
+ my ($in) = @_;
+ $in->ask_warn(N("Sound trouble shooting"),
+ formatAlaTeX(N("The classic bug sound tester is to run the following commands:
+
+
+- \"lspcidrake -v | fgrep AUDIO\" will tell you which driver your card use
+by default
+
+- \"grep snd-slot /etc/modules.conf\" will tell you what driver it
+currently uses
+
+- \"/sbin/lsmod\" will enable you to check if its module (driver) is
+loaded or not
+
+- \"/sbin/chkconfig --list sound\" and \"/sbin/chkconfig --list alsa\" will
+tell you if sound and alsa services're configured to be run on
+initlevel 3
+
+- \"aumix -q\" will tell you if the sound volume is muted or not
+
+- \"/sbin/fuser -v /dev/dsp\" will tell which program uses the sound card.
+")));
+}
+
1;