summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-10-15 14:40:23 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-10-15 14:40:23 +0000
commit2dd15afc7227ce692048869317494df839b9ed02 (patch)
tree265485d36be04fa8aa26d490b8bd5e8539245fd3 /perl-install/install2.pm
parent39def6996941bb414d0d6ac9d50ba49933869017 (diff)
downloaddrakx-backup-do-not-use-2dd15afc7227ce692048869317494df839b9ed02.tar
drakx-backup-do-not-use-2dd15afc7227ce692048869317494df839b9ed02.tar.gz
drakx-backup-do-not-use-2dd15afc7227ce692048869317494df839b9ed02.tar.bz2
drakx-backup-do-not-use-2dd15afc7227ce692048869317494df839b9ed02.tar.xz
drakx-backup-do-not-use-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.pm5
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";