summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2006-03-28 18:22:59 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2006-03-28 18:22:59 +0000
commit249eec59a7da0fbef06a09da571fafcdc22a3cb7 (patch)
tree369d4b903a9d1785b89f8c0f458eef8d2277e297
parentec95ff29a94bb30c34bcf16a2f445c4dcf708121 (diff)
downloadmgaonline-249eec59a7da0fbef06a09da571fafcdc22a3cb7.tar
mgaonline-249eec59a7da0fbef06a09da571fafcdc22a3cb7.tar.gz
mgaonline-249eec59a7da0fbef06a09da571fafcdc22a3cb7.tar.bz2
mgaonline-249eec59a7da0fbef06a09da571fafcdc22a3cb7.tar.xz
mgaonline-249eec59a7da0fbef06a09da571fafcdc22a3cb7.zip
fix creating account (wizard was broken since 15/9/2005)
-rwxr-xr-xmdkonline10
1 files changed, 5 insertions, 5 deletions
diff --git a/mdkonline b/mdkonline
index b6b9cfce..3d3d2db2 100755
--- a/mdkonline
+++ b/mdkonline
@@ -43,7 +43,7 @@ my $confdir = '/root/.MdkOnline';
my $conffile = "$confdir/mdkupdate";
my $logfile = '/var/tmp/mdkonline.log';
-my ($greeting, $firstname, $lastname, $login, $account, $password, $npassword, $boxname, $cfmpassword, $email, $country, $ia, $alias);
+my ($greeting, $firstname, $lastname, $login, $password, $npassword, $boxname, $cfmpassword, $email, $country, $ia, $alias);
my @info;
@@ -156,24 +156,24 @@ my $wiz =
{ label => N("Greeting:"), val => \$greeting, list => [ @greets ], type => 'combo' },
{ label => N("First name:"), val => \$firstname },
{ label => N("Last name:"), val => \$lastname },
- { label => N("Email address:"), val => \$account },
+ { label => N("Email address:"), val => \$email },
{ label => N("Password:"), val => \$npassword, hidden => 1 },
{ label => N("Confirm Password:"), val => \$cfmpassword, hidden => 1 },
];
},
complete => sub {
$alias = $firstname . $lastname;
- @info = ($account, $npassword, $firstname, $lastname, $lang, $greeting, $alias, 'home');
+ @info = ($email, $npassword, $firstname, $lastname, $lang, $greeting, $alias, 'home');
if ($npassword ne $cfmpassword) {
$in->ask_warn(N("Error"), N("The passwords do not match\n Please try again\n"));
return 1;
}
- if (!$account || !$firstname || !$lastname) {
+ if (!$email || !$firstname || !$lastname) {
$in->ask_warn(N("Error"), N("Please fill in each field"));
return 1;
}
if (mdkonline::check_valid_email($email) == 0) {
- $in->ask_warn(N("Error"), N("Not a valid mail address!\n"));
+ $in->ask_warn(N("Error"), N("Not a valid mail address!\n") . "\n\n" . $email);
return 1;
}
if (mdkonline::create_authenticate_account('create', @info) ne 'OK') {