From 84a16a711446b3f1b374aa6722f5836a9007d29d Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 27 Jul 2004 06:35:00 +0000 Subject: enable to use new wizards layer rather than old through use_new_data_structure flag. (smooth migration was already helped through addition of the "complete" callback) --- drakwizard.pl | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/drakwizard.pl b/drakwizard.pl index c6895365..3edab765 100755 --- a/drakwizard.pl +++ b/drakwizard.pl @@ -81,8 +81,15 @@ if ($err) { $in->ask_okcancel(N("Error"), translate($err)); $in->exit; } -wizard($wiz->{o}); +if ($wiz->{o}{use_new_data_structure}) { + require wizards; + my $wizard = wizards->new; + $::in = $in; + $wizard->safe_process($wiz->{o}, $in); +} else { + wizard($wiz->{o}); +} $in->exit; sub wizard { -- cgit v1.2.1