summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDaouda Lo <daouda@mandriva.com>2005-09-16 15:13:49 +0000
committerDaouda Lo <daouda@mandriva.com>2005-09-16 15:13:49 +0000
commit6a51563117ce479c46a15bc7cb7e938a8b3dcc1a (patch)
tree57cb41c004d07ef81b9959e5f2fb574d8d3c9ee7
parentfabde284dc0e5ee2f85a5f529832d7c6989f248c (diff)
downloadmgaonline-6a51563117ce479c46a15bc7cb7e938a8b3dcc1a.tar
mgaonline-6a51563117ce479c46a15bc7cb7e938a8b3dcc1a.tar.gz
mgaonline-6a51563117ce479c46a15bc7cb7e938a8b3dcc1a.tar.bz2
mgaonline-6a51563117ce479c46a15bc7cb7e938a8b3dcc1a.tar.xz
mgaonline-6a51563117ce479c46a15bc7cb7e938a8b3dcc1a.zip
- check valid name box
-rwxr-xr-xmdkonline10
1 files changed, 7 insertions, 3 deletions
diff --git a/mdkonline b/mdkonline
index bd548eef..1d659690 100755
--- a/mdkonline
+++ b/mdkonline
@@ -121,9 +121,13 @@ $wiz = {
];
},
post => sub {
- my $_wait = $in->wait_message(N("Please wait"), N("Connecting to Mandriva Online website...")) if $ia;
- @info = ($login, $password);
- $is_success = mdkonline::create_authenticate_account('authenticate', @info); undef($_wait);
+ if (!mdkonline::check_valid_boxname($boxname)) {
+ $is_success = N("Machine name must be 1 to 40 alphanumerical characters");
+ } else {
+ my $_wait = $in->wait_message(N("Please wait"), N("Connecting to Mandriva Online website...")) if $ia;
+ @info = ($login, $password);
+ $is_success = mdkonline::create_authenticate_account('authenticate', @info); undef($_wait);
+ }
"authenticate";
},
},