diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-10-15 14:40:23 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-10-15 14:40:23 +0000 |
| commit | 2dd15afc7227ce692048869317494df839b9ed02 (patch) | |
| tree | 265485d36be04fa8aa26d490b8bd5e8539245fd3 /perl-install/install2.pm | |
| parent | 39def6996941bb414d0d6ac9d50ba49933869017 (diff) | |
| download | drakx-2dd15afc7227ce692048869317494df839b9ed02.tar drakx-2dd15afc7227ce692048869317494df839b9ed02.tar.gz drakx-2dd15afc7227ce692048869317494df839b9ed02.tar.bz2 drakx-2dd15afc7227ce692048869317494df839b9ed02.tar.xz drakx-2dd15afc7227ce692048869317494df839b9ed02.zip | |
set move steps, add exitMove step, pass $o to move::init()
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index ed179a6ec..ff65082d6 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -296,6 +296,9 @@ sub exitInstall { installStepsCall($o, $auto, 'exitInstall', getNextStep($::o) eq 'exitInstall'); } +sub exitMove { + move::exit(); +} sub start_i810fb() { @@ -424,7 +427,7 @@ sub main { if ($::move) { require move; - move::init(); + move::init($o); } $o->{prefix} = $::prefix = $::testing ? "/tmp/test-perl-install" : $::live || $::move ? "" : "/mnt"; |