--- modules/relate/lonlogin.pm 2012/02/13 15:00:24 1.6
+++ modules/relate/lonlogin.pm 2012/05/01 15:47:14 1.10
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Login Screen
#
-# $Id: lonlogin.pm,v 1.6 2012/02/13 15:00:24 raeburn Exp $
+# $Id: lonlogin.pm,v 1.10 2012/05/01 15:47:14 relate Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -293,7 +293,9 @@ sub handler {
'serv' => 'Server',
'servadm' => 'Server Administration',
'helpdesk' => 'Contact Helpdesk',
- 'exist' => 'Existing user?',
+ 'exist' => 'Existing user - sign-up with existing username',
+ 'create' => 'New user - create username and sign-up',
+ 'already' => 'Already signed up?',
'forgotpw' => 'Forgot your password?',
'newuser' => 'New User?',
'click' => 'Click here to sign up',
@@ -319,6 +321,7 @@ sub handler {
# ---------------------------------------- Assemble Javascript to put in
+
my $js = (<
@@ -370,6 +373,16 @@ function enableInput() {
return;
}
+function SubmitSignUp() {
+ if (document.signup.usertype[0].checked == true) {
+ document.signup.action = '/adm/createaccount';
+ }
+ if (document.signup.usertype[1].checked == true) {
+ document.signup.action = '/adm/selfenroll';
+ }
+ return true;
+}
+
// ]]>
@@ -398,7 +411,7 @@ ENDSCRIPT
$lt{'mech'} = &mt('Mechanics Online is a Newtonian Mechanics course developed by Professor David Pritchard and the RELATE education group at MIT. [_1]Learn more[_2]','',' ');
$lt{'runson'} = &mt('Mechanics Online runs on [_1]LON-CAPA[_2] - an open source, freeware, distributed learning content management and assessment system.',
'',
- ' ');
+ '');
$lt{'newhere'} = &mt('New to [_1]Mechanics Online[_2]:','',' ');
$lt{'browser'} = &mt('Your browser must allow [_1]cookies[_2]',
'',' ');
@@ -459,14 +472,15 @@ END
$versionrow = <<"END";
- $version
+
+ $version
END
}
# -------------------------------------------- Static cid for prerequisite test
- my $prereqcid = 'relate_3H121116c19344ff3relatel1';
+ my $prereqcid = 'relate_2764113e81b9e4f0crelatel1';
# ---------------------------------------------------- Warning if no Javascript
my $noscript_warning = ''.
@@ -508,26 +522,22 @@ END
$lt{'newto'}
$lt{'mech'}
$lt{'runson'}
-
-