diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-07-08 02:29:22 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-07-08 02:29:22 +0000 |
| commit | 456e9f45a23678f2610a08f3b0e68dde159d956b (patch) | |
| tree | 3470eb570420e388152a60ccc876140516f9ae0f /perl-install/modules.pm | |
| parent | d7caf9ba8bac3b97005a2d3c64d37dc575a654f8 (diff) | |
| download | drakx-456e9f45a23678f2610a08f3b0e68dde159d956b.tar drakx-456e9f45a23678f2610a08f3b0e68dde159d956b.tar.gz drakx-456e9f45a23678f2610a08f3b0e68dde159d956b.tar.bz2 drakx-456e9f45a23678f2610a08f3b0e68dde159d956b.tar.xz drakx-456e9f45a23678f2610a08f3b0e68dde159d956b.zip | |
cleanup
Diffstat (limited to 'perl-install/modules.pm')
| -rw-r--r-- | perl-install/modules.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 1d801ff3f..76f219eb7 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -183,6 +183,9 @@ sub set_options { log::l(qq(set option "$new_option" for module "$name")); $conf{$name}{options} = $new_option; } +sub get_parameters { + map { if_(/(.*)=(.*)/, $1 => $2) } split(' ', get_options($_[0])); +} sub set_alias { my ($alias, $module) = @_; $module =~ /ignore/ and return; @@ -423,6 +426,9 @@ sub when_load_category { } } +#-############################################################################### +#- isInstall functions +#-############################################################################### sub cz_file() { "/lib/modules" . (arch() eq 'sparc64' && "64") . ".cz-" . c::kernel_version(); } @@ -469,9 +475,4 @@ sub load_raw { } -sub get_parameters { - map { if_(/(.*)=(.*)/, $1 => $2) } split(' ', get_options($_[0])); -} - - 1; |