summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-07-04 22:25:15 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-07-04 22:25:15 +0000
commit9602001c7823079a8e8ca0e737a8fe2f6c0db0d2 (patch)
tree6a4a4b5bb040972c82f8f23a7f154b7631d95591 /perl-install/install_any.pm
parentb5b714420602230508f199cb392d21c4410a4f1d (diff)
downloaddrakx-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar
drakx-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar.gz
drakx-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar.bz2
drakx-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.tar.xz
drakx-9602001c7823079a8e8ca0e737a8fe2f6c0db0d2.zip
adapt to new modules.pm
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index ea2639dd3..241c56da9 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -359,7 +359,7 @@ sub setDefaultPackages {
}
}
}
- $o->{compssUsersChoice}{uc($_)} = 1 foreach grep { modules::get_that_type($_) } ('tv', 'scanner', 'photo', 'sound');
+ $o->{compssUsersChoice}{uc($_)} = 1 foreach grep { modules::probe_category("multimedia/$_") } modules::sub_categories('multimedia');
$o->{compssUsersChoice}{uc($_)} = 1 foreach map { $_->{driver} =~ /Flag:(.*)/ } detect_devices::probeall();
$o->{compssUsersChoice}{SYSTEM} = 1;
$o->{compssUsersChoice}{DOCS} = !$o->{excludedocs};
@@ -823,7 +823,7 @@ sub loadO {
my $b = before_leaving {
fs::umount("/mnt") unless $::testing;
- modules::unload($_) foreach qw(vfat fat);
+ modules::unload(qw(vfat fat));
};
$o = loadO($O, $f);
} else {