summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 20ecda04d..caddc0fab 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -318,12 +318,14 @@ if_(arch() !~ /sparc|ppc|ia64/,
}
$Modify->($e) or return;
push @{$b->{entries}}, $e;
+ $e;
};
my $Remove = sub {
my ($e) = @_;
delete $b->{default} if $b->{default} eq $e->{label};
@{$b->{entries}} = grep { $_ != $e } @{$b->{entries}};
+ 1;
};
$in->ask_from__add_modify_remove('',