summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-01-06 16:12:52 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-01-06 16:12:52 +0000
commit1e00a512393b4630fc9dba1dba051fa64c0ccd30 (patch)
tree45d06df0239fe7b7bc94b2fa80a7b30cea90dd70 /perl-install/install_steps.pm
parent960dd8c2fc966b1bc0488221a4b14077bb8b6ad4 (diff)
downloaddrakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar.gz
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar.bz2
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar.xz
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.zip
get rid of g_auto_install (unused & not working)
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm11
1 files changed, 4 insertions, 7 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index a35543864..04d65a817 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -118,10 +118,10 @@ sub selectLanguage {
addToBeDone {
lang::write_langs($o->{prefix}, $o->{locale}{langs});
- } 'formatPartitions' unless $::g_auto_install;
+ } 'formatPartitions';
addToBeDone {
lang::write($o->{prefix}, $o->{locale});
- } 'installPackages' unless $::g_auto_install;
+ } 'installPackages';
}
#------------------------------------------------------------------------------
sub selectKeyboard {
@@ -131,7 +131,7 @@ sub selectKeyboard {
addToBeDone {
keyboard::write($o->{keyboard});
- } 'installPackages' if !$::g_auto_install && (!$o->{isUpgrade} || !$o->{keyboard}{unsafe});
+ } 'installPackages' if !$o->{isUpgrade} || !$o->{keyboard}{unsafe};
if ($o->{raw_X}) {
require Xconfig::default;
@@ -387,7 +387,7 @@ sub installPackages($$) { #- complete REWORK, TODO and TOCHECK!
any::writeandclean_ldsoconf($o->{prefix});
delete $ENV{DURING_INSTALL};
- run_program::rooted_or_die($o->{prefix}, 'ldconfig') unless $::g_auto_install;
+ run_program::rooted_or_die($o->{prefix}, 'ldconfig');
log::l("Install took: ", formatTimeRaw(time() - $time));
install_any::log_sizes($o);
scalar(@toInstall); #- return number of packages installed.
@@ -396,8 +396,6 @@ sub installPackages($$) { #- complete REWORK, TODO and TOCHECK!
sub afterInstallPackages($) {
my ($o) = @_;
- return if $::g_auto_install;
-
die \N("Some important packages didn't get installed properly.
Either your cdrom drive or your cdrom is defective.
Check the cdrom on an installed computer using \"rpm -qpl Mandrake/RPMS/*.rpm\"
@@ -859,7 +857,6 @@ sub setupBootloaderBefore {
sub setupBootloader {
my ($o) = @_;
- return if $::g_auto_install;
require bootloader;
bootloader::install($o->{bootloader}, $o->{fstab}, $o->{all_hds}{hds});