diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-11-07 17:38:01 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-11-07 17:38:01 +0000 |
| commit | 246b337f95f3e0edc21d31b4b6a1d826d0a120cc (patch) | |
| tree | 22a8656238d8f9d484e2df4241f36c3c192322bb /perl-install/install2.pm | |
| parent | f24720f5798d7bd84bc7d39967fa52fcd6802df0 (diff) | |
| download | drakx-246b337f95f3e0edc21d31b4b6a1d826d0a120cc.tar drakx-246b337f95f3e0edc21d31b4b6a1d826d0a120cc.tar.gz drakx-246b337f95f3e0edc21d31b4b6a1d826d0a120cc.tar.bz2 drakx-246b337f95f3e0edc21d31b4b6a1d826d0a120cc.tar.xz drakx-246b337f95f3e0edc21d31b4b6a1d826d0a120cc.zip | |
(main): $::oem is now global :-( (needed in install_steps.pm)
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index f1e3e4d62..bb9f55bbc 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -455,7 +455,7 @@ sub main { #- c::unlimit_core() unless $::testing; - my ($cfg, $patch, $oem, @auto); + my ($cfg, $patch, @auto); my %cmdline; map { my ($n, $v) = split '='; $cmdline{$n} = $v || 1; @@ -476,7 +476,7 @@ sub main { map_each { my ($n, $v) = @_; my $f = ${{ - oem => sub { $oem = $v }, + oem => sub { $::oem = $v }, lang => sub { $o->{lang} = $v }, flang => sub { $o->{lang} = $v ; push @auto, 'selectLanguage' }, method => sub { $o->{method} = $v }, @@ -603,7 +603,7 @@ sub main { if ($o->{meta_class} eq 'desktop') { $o->{installClass} = 'normal'; } - if ($oem) { + if ($::oem) { $o->{partitioning}{use_existing_root} = 1; $o->{partitioning}{auto_allocate} = 1; $o->{compssListLevel} = 50; |