summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/modules.pm6
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/;
}
}