diff options
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/service_harddrake | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index c19be0453..bb5b86c75 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -18,6 +18,13 @@ use Storable qw(store retrieve); my $force = any { $_ eq '--force' } @ARGV; +my $mode = 'stop' if $ARGV[0] eq 'stop'; + +if ($mode eq 'stop') { + append_to_file('/etc/hotplug/blacklist', "\nsnd-usb-audio\n"); + c::_exit(0); +} + my $invert_do_it = $ARGV[0] eq 'X11' ? 1 : 0; my ($hw_sysconfdir, $timeout) = ("/etc/sysconfig/harddrake2", $invert_do_it ? 600 : 25); my $last_boot_config = "$hw_sysconfdir/previous_hw"; |