summaryrefslogtreecommitdiffstats
path: root/perl-install/harddrake
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2011-05-18 23:43:53 +0000
committerThierry Vignaud <tv@mageia.org>2011-05-18 23:43:53 +0000
commit9dbbf335fe3c6f3034f25ac947029ac2e802e366 (patch)
treeaf928320e902a6933a11cb4a582af3e089fb182a /perl-install/harddrake
parenta9a26e71540b90da1f243d8b91255b70df887bc9 (diff)
downloaddrakx-9dbbf335fe3c6f3034f25ac947029ac2e802e366.tar
drakx-9dbbf335fe3c6f3034f25ac947029ac2e802e366.tar.gz
drakx-9dbbf335fe3c6f3034f25ac947029ac2e802e366.tar.bz2
drakx-9dbbf335fe3c6f3034f25ac947029ac2e802e366.tar.xz
drakx-9dbbf335fe3c6f3034f25ac947029ac2e802e366.zip
make file tests more compact
Diffstat (limited to 'perl-install/harddrake')
-rw-r--r--perl-install/harddrake/sound.pm12
1 files changed, 3 insertions, 9 deletions
diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm
index 9ffaf0fe0..67b51d3e1 100644
--- a/perl-install/harddrake/sound.pm
+++ b/perl-install/harddrake/sound.pm
@@ -190,9 +190,7 @@ sub set_pulseaudio {
my ($val) = @_;
my $alterative = '/etc/sound/profiles/' . ($val ? 'pulse' : 'alsa');
- if ( ! -d $alterative ) {
- return;
- }
+ return if ! -d $alterative;
common::symlinkf_update_alternatives('soundprofile', $alterative);
@@ -221,9 +219,7 @@ sub is_pulseaudio_glitchfree_enabled() {
sub set_pulseaudio_glitchfree {
my ($val) = @_;
- if ( ! -f $pa_startup_scriptfile ) {
- return;
- }
+ return if ! -f $pa_startup_scriptfile;
substInFile {
if ($val) {
@@ -239,9 +235,7 @@ my $pa_client_conffile = "$::prefix/etc/pulse/client.conf";
sub set_PA_autospan {
my ($val) = @_;
- if ( ! -f $pa_client_conffile ) {
- return;
- }
+ return if ! -f $pa_client_conffile;
$val = 'autospawn = ' . bool2yesno($val) . "\n";
my $done;