diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-01-06 16:12:52 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-01-06 16:12:52 +0000 |
commit | 1e00a512393b4630fc9dba1dba051fa64c0ccd30 (patch) | |
tree | 45d06df0239fe7b7bc94b2fa80a7b30cea90dd70 /perl-install/install_steps.pm | |
parent | 960dd8c2fc966b1bc0488221a4b14077bb8b6ad4 (diff) | |
download | drakx-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.pm | 11 |
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}); |