summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-08-08 20:10:26 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-08-08 20:10:26 +0000
commit422d63b7ef2d8e8b240cf84816eaf15e32cb3d20 (patch)
tree43dc3185150181a195e8cba7a8a88d5fe00d16eb /perl-install/install_steps.pm
parent358c4f95e99c24c55e2300641b287d8e5afd50d2 (diff)
downloaddrakx-422d63b7ef2d8e8b240cf84816eaf15e32cb3d20.tar
drakx-422d63b7ef2d8e8b240cf84816eaf15e32cb3d20.tar.gz
drakx-422d63b7ef2d8e8b240cf84816eaf15e32cb3d20.tar.bz2
drakx-422d63b7ef2d8e8b240cf84816eaf15e32cb3d20.tar.xz
drakx-422d63b7ef2d8e8b240cf84816eaf15e32cb3d20.zip
makes interactive_pkgs stuff work
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 00594b950..dcc858015 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -835,7 +835,8 @@ sub configureX {
{ local $::testing = 0; #- unset testing
local $::auto = 1;
$o->{X}{skiptest} = 1;
- Xconfigurator::main($o->{prefix}, $o->{X}, class_discard->new,
+ local @ISA; push @ISA, 'class_discard';
+ Xconfigurator::main($o->{prefix}, $o->{X}, $o,
{ allowFB => $o->{allowFB},
allowNVIDIA_rpms => install_any::allowNVIDIA_rpms($o->{packages}),
});
@@ -964,6 +965,7 @@ sub cleanIfFailedUpgrade($) {
}
}
+
#-######################################################################################
#- Wonderful perl :(
#-######################################################################################