From 6c49b184ecbe855a6eb6437ed4cff4e76cb4d01e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 22 Mar 2005 15:46:12 +0000
Subject: put the question inside the interactive code

---
 perl-install/standalone/keyboarddrake | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'perl-install/standalone/keyboarddrake')

diff --git a/perl-install/standalone/keyboarddrake b/perl-install/standalone/keyboarddrake
index 5a108ed85..9b1356056 100755
--- a/perl-install/standalone/keyboarddrake
+++ b/perl-install/standalone/keyboarddrake
@@ -39,11 +39,11 @@ if (my ($kb) = grep { !/^-/ } @ARGV) {
 		]) or goto end;
 
     keyboard::group_toggle_choose($in, $keyboard) or goto choose;
-}
 
-if ($::expert) {
-    my $isNotDelete = !$in->ask_yesorno("BackSpace", N("Do you want the BackSpace to return Delete in console?"), 1);
-    $keyboard->{BACKSPACE} = $isNotDelete ? "BackSpace" : "Delete";
+    if ($::expert) {
+	my $isNotDelete = !$in->ask_yesorno("BackSpace", N("Do you want the BackSpace to return Delete in console?"), 1);
+	$keyboard->{BACKSPACE} = $isNotDelete ? "BackSpace" : "Delete";
+    }
 }
 
 keyboard::setxkbmap($keyboard);
-- 
cgit v1.2.1