summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-12-16 19:30:55 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-12-16 19:30:55 +0000
commitc930e6cc7e11b72ab1786f209dffb49a11bea8f7 (patch)
tree0bc6f4be7493c333f87ae7f8cf6252870805d3db /perl-install/any.pm
parentc3822da244887ef19b2ef7bba5812d18bc6ea8db (diff)
downloaddrakx-backup-do-not-use-c930e6cc7e11b72ab1786f209dffb49a11bea8f7.tar
drakx-backup-do-not-use-c930e6cc7e11b72ab1786f209dffb49a11bea8f7.tar.gz
drakx-backup-do-not-use-c930e6cc7e11b72ab1786f209dffb49a11bea8f7.tar.bz2
drakx-backup-do-not-use-c930e6cc7e11b72ab1786f209dffb49a11bea8f7.tar.xz
drakx-backup-do-not-use-c930e6cc7e11b72ab1786f209dffb49a11bea8f7.zip
fix daminetsex
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index be1ff5e28..3c6d8d624 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -490,7 +490,7 @@ sub setup_thiskind {
my ($in, $type, $auto, $at_least_one) = @_;
return if arch() eq "ppc";
- my @l=setup_thiskind_backend ($type, $auto, $at_least_one, sub { my $w = wait_load_module($in, $type, @_) } );
+ my @l = setup_thiskind_backend ($type, $auto, $at_least_one, sub { my $w = wait_load_module($in, $type, @_) } );
if (!$::noauto) {
if (my @err = grep { $_ } map { $_->{error} } @l) {
@@ -533,7 +533,7 @@ sub setup_thiskind_backend {
my @l;
if (!$::noauto) {
@l = modules::load_thiskind($type, $wait_function );
- return @l if $auto && (@l || !$at_least_one);
+ return @l;# DAMS SUCKERY if $auto && (@l || !$at_least_one);
}
}