summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-09-22 22:28:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-09-22 22:28:16 +0000
commit046c5b383794bfe42480723d32bbb91380671bab (patch)
treee01726159329239568857533cde6549f97ab5531 /perl-install/install2.pm
parentf27e0ad435eef7902c35562b75b03fb11f4e5c8d (diff)
downloaddrakx-046c5b383794bfe42480723d32bbb91380671bab.tar
drakx-046c5b383794bfe42480723d32bbb91380671bab.tar.gz
drakx-046c5b383794bfe42480723d32bbb91380671bab.tar.bz2
drakx-046c5b383794bfe42480723d32bbb91380671bab.tar.xz
drakx-046c5b383794bfe42480723d32bbb91380671bab.zip
no_comment
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 68856df90..fa074531b 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -452,6 +452,7 @@ sub main {
$ENV{SHARE_PATH} ||= "/usr/share";
$ENV{PERL_BADLANG} = 1;
+ $::isInstall = 1;
$::beginner = $::expert = $::g_auto_install = 0;
#- c::unlimit_core() unless $::testing;
@@ -620,7 +621,9 @@ sub main {
$o->{interactive} = "newt";
require install_steps_newt;
}
- $o->{meta_class} = 'desktop' if cat__(install_any::getFile("VERSION")) =~ /desktop/i;
+ my $VERSION = cat__(install_any::getFile("VERSION"));
+ $o->{lnx4win} = 1 if $VERSION =~ /lnx4win/i;
+ $o->{meta_class} = 'desktop' if $VERSION =~ /desktop/i;
if ($o->{meta_class} eq 'desktop') {
$o->{installClass} = 'normal';
push @auto, 'selectInstallClass';