don't remove "above ... snd-pcm-oss" for the old alias, it's better done explictly, and already done by remove_module()

1 files changed, 1 insertions, 5 deletions

diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index 86fa1840e..dc71ad5e1 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -207,11 +207,7 @@ sub remove_alias_regexp {
     my ($aliased) = @_;
     log::l(qq(removing all aliases that match "$aliased"));
     foreach (keys %conf) {
-        if (/$aliased/) {
-            my $module = $conf{$_}{alias};
-            delete $conf{$module}{above} if $module =~ /^snd-/;
-            delete $conf{$_}{alias};
-        }
+        delete $conf{$_}{alias} if /$aliased/;
     }
 }