From 336a0bf9555e157a8840c88e1a08614fb52499fc Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 17 Aug 2004 08:07:43 +0000 Subject: $::corporate is dead --- perl-install/install_steps_interactive.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/install_steps_interactive.pm') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 6fd0462b9..b547b138d 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -428,7 +428,7 @@ sub choosePackages { undef $w; chooseGroups: - $o->chooseGroups($packages, $compssUsers, $min_mark, \$individual, $max_size) if !$o->{isUpgrade} && !$::corporate && $o->{meta_class} ne 'desktop'; + $o->chooseGroups($packages, $compssUsers, $min_mark, \$individual, $max_size) if !$o->{isUpgrade} && $o->{meta_class} ne 'desktop'; ($o->{packages_}{ind}) = pkgs::setSelectedFromCompssList($packages, $o->{rpmsrate_flags_chosen}, $min_mark, $availableC); @@ -1161,7 +1161,7 @@ sub setRootPassword { messages => N("Set root password"), advanced_messages => authentication::kind2description(), interactive_help_id => "setRootPassword", - cancel => ($o->{security} <= 2 && !$::corporate ? + cancel => ($o->{security} <= 2 ? #-PO: keep this short or else the buttons will not fit in the window N("No password") : ''), focus_first => 1, -- cgit v1.2.1