From e3059d803205332b270e875070f47809339f145d Mon Sep 17 00:00:00 2001 From: damien Date: Mon, 18 Dec 2000 19:18:33 +0000 Subject: included firewall handling --- perl-install/install2.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install/install2.pm') diff --git a/perl-install/install2.pm b/perl-install/install2.pm index e59c96fac..0a257ee9d 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -494,6 +494,7 @@ sub main { class => sub { $o->{installClass} = $v }, fclass => sub { $o->{installClass} = $v; push @auto, 'selectInstallClass' }, desktop => sub { $o->{meta_class} = 'desktop' }, + firewall => sub { $o->{meta_class} = 'firewall'; push @auto, 'selectInstallClass'}, lnx4win => sub { $o->{lnx4win} = 1 }, readonly => sub { $o->{partitioning}{readonly} = $v ne "0" }, display => sub { $o->{display} = $v }, @@ -605,6 +606,7 @@ sub main { my $VERSION = cat__(install_any::getFile("VERSION")) or do { print "VERSION file missing\n"; sleep 5 }; $o->{lnx4win} = 1 if $VERSION =~ /lnx4win/i; $o->{meta_class} = 'desktop' if $VERSION =~ /desktop/i; + $o->{meta_class} = 'firewall' if $VERSION =~ /firewall/i; if ($o->{meta_class} eq 'desktop') { $o->{installClass} = 'normal'; } -- cgit v1.2.1