From 17e5420e2253dd4f00bd46919babcaafc004f524 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 3 Apr 2008 06:40:59 +0000 Subject: enable to restore the system through rsnapshot if giving "restore" on cmdline --- perl-install/install/steps_interactive.pm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'perl-install/install/steps_interactive.pm') diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index 84984e32c..9b167551a 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -109,6 +109,11 @@ sub selectKeyboard { } keyboard::group_toggle_choose($o, $o->{keyboard}) or goto &selectKeyboard; install::steps::selectKeyboard($o); + if ($::isRestore) { + require MDV::Snapshot::Restore; + MDV::Snapshot::Restore::main($o); + $o->exit; + } } #------------------------------------------------------------------------------ -- cgit v1.2.1