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.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index a34d6e8fc..1a8e5657a 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -603,7 +603,7 @@ sub setup_thiskind {
my @l = do {
my $w;
- setup_thiskind_backend ($type, $auto, $at_least_one, sub { $w = wait_load_module($in, $type, @_); } );
+ setup_thiskind_backend($type, $auto, $at_least_one, sub { $w = wait_load_module($in, $type, @_) });
};
if (!$::noauto) {
@@ -644,9 +644,9 @@ sub setup_thiskind_backend {
my ($type, $auto, $at_least_one, $wait_function) = @_;
#- for example $wait_function=sub { $w = wait_load_module($in, $type, @_) }
- my @l;
if (!$::noauto) {
- @l = modules::load_thiskind($type, $wait_function );
+ my @l = modules::load_thiskind($type, $wait_function, '');
+ @l = modules::load_thiskind($type, $wait_function, 'force') if !@l && $at_least_one;
return @l;# sorry to be a sucker, pixel... :)
}
}