diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-10-14 06:04:22 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-10-14 06:04:22 +0000 |
commit | 1f904b16be5d7dae34aeaa8ca2fa5a3c64491ba7 (patch) | |
tree | 4845a85817ba78016067dd6dfc33b1ad7f11e6d2 /perl-install/standalone/service_harddrake | |
parent | 203185d0228bd8bcb607f677d9880aa833406dce (diff) | |
download | drakx-1f904b16be5d7dae34aeaa8ca2fa5a3c64491ba7.tar drakx-1f904b16be5d7dae34aeaa8ca2fa5a3c64491ba7.tar.gz drakx-1f904b16be5d7dae34aeaa8ca2fa5a3c64491ba7.tar.bz2 drakx-1f904b16be5d7dae34aeaa8ca2fa5a3c64491ba7.tar.xz drakx-1f904b16be5d7dae34aeaa8ca2fa5a3c64491ba7.zip |
cleanup thanks to perl_checker
Diffstat (limited to 'perl-install/standalone/service_harddrake')
-rwxr-xr-x | perl-install/standalone/service_harddrake | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index e428145d9..530059ff1 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -16,9 +16,9 @@ use modules; use Storable qw(store retrieve); -my $force = any { $_ eq '--force' } @ARGV; +my $force = member('--force', @ARGV); -my $mode = 'stop' if $ARGV[0] eq 'stop'; +my $mode = $ARGV[0] eq 'stop' && 'stop'; if ($mode eq 'stop') { append_to_file('/etc/hotplug/blacklist', "\nsnd-usb-audio\n"); |