1 files changed, 9 insertions, 0 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index c2dd27108..6d1f1093e 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -101,6 +101,15 @@ sub selectLanguage {
 sub selectKeyboard {
     my ($o) = @_;
     keyboard::setup($o->{keyboard});
+
+    #- if we go back to the selectKeyboard, you must rewrite
+    addToBeDone {
+	lang::write_langs($o->{prefix}, $o->{langs});
+    } 'formatPartitions' unless $::g_auto_install;
+    addToBeDone {
+	lang::write($o->{prefix}, $o->{lang});
+	keyboard::write($o->{prefix}, $o->{keyboard}, lang::lang2charset($o->{lang}));
+    } 'installPackages' unless $::g_auto_install;
 }
 #------------------------------------------------------------------------------
 sub selectPath {}