summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-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;