From 962730c28c8577b7cdba71d81d67aeff41795a94 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Thu, 13 Nov 2003 13:29:19 +0000 Subject: really start with first ordered step --- move/move.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/move/move.pm b/move/move.pm index 26ce6a6ce..0556eaecd 100644 --- a/move/move.pm +++ b/move/move.pm @@ -108,7 +108,8 @@ drakx_stuff: $o->{steps}{handleMoveKey} = { reachable => 1, text => "Handle Move Key" }; $o->{orderedSteps_orig} = $o->{orderedSteps}; $o->{orderedSteps} = [ qw(setupSCSI handleMoveKey selectLanguage handleI18NClp acceptLicense selectMouse selectKeyboard startMove) ]; - + $o->{steps}{first} = $o->{orderedSteps}[0]; + member($_, @ALLOWED_LANGS) or delete $lang::langs{$_} foreach keys %lang::langs; } -- cgit v1.2.1