--- loncom/interface/createaccount.pm	2012/02/13 17:50:35	1.40.2.5.2.7
+++ loncom/interface/createaccount.pm	2012/05/01 13:58:27	1.40.2.5.2.15
@@ -3,7 +3,7 @@
 # institutional log-in ID (institutional authentication required - localauth
 #  or kerberos) or an e-mail address.
 #
-# $Id: createaccount.pm,v 1.40.2.5.2.7 2012/02/13 17:50:35 raeburn Exp $
+# $Id: createaccount.pm,v 1.40.2.5.2.15 2012/05/01 13:58:27 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -102,6 +102,10 @@ sub handler {
     my ($js,$courseid,$title);
     if (defined($env{'form.courseid'})) {
         $courseid = &validate_course($env{'form.courseid'});
+        if (($courseid eq 'relate_3H121116c19344ff3relatel1') ||
+            ($courseid eq 'relate_3e100973b27484f2drelatel1')) {
+            $courseid = 'relate_2764113e81b9e4f0crelatel1'; 
+        }
     }
     if ($courseid ne '') {
         $js = &catreturn_js();
@@ -409,11 +413,10 @@ sub print_username_form {
         crea   => 'Create account with a username provided by this institution',
         crlc   => 'Create LON-CAPA account',
         type   => 'Type in your log-in ID and password to find out.',
-        sign   => 'You are about to sign-up for the Mechanics Online course.',
         plse   => 'Please enter a valid e-mail address below.',
         inst   => 'Instructions on how to activate your account will be sent to the e-mail address you provide.',
-        aftr   => 'After completing the activation process you will have access to a "self test" that will help you assess your readiness for the course.',
-        thes   => 'The same account will be used for access to the Mechanics Online course, once it becomes available on March 1, 2012',
+        aftr   => 'After completing the activation process you will be directed to the course, where you will have access to a "self test" that will help you assess your readiness for the course.  You will also have access to some introductory material and to the course schedule and policies.',
+        yous => 'Your user id for the course is your email address.',
     );
     my $output;
     if (ref($cancreate) eq 'ARRAY') {
@@ -430,11 +433,12 @@ sub print_username_form {
         }
         if (grep(/^email$/,@{$cancreate})) {
             $output .= '<div class="LC_left_float"><h3>'.&mt('Create account with an e-mail address as your username').'</h3>'.
-                        $lt{'sign'}.'<br />'.
-                        $lt{'plse'}.'<br />'.
-                        $lt{'inst'}.'<br />'.
-                        $lt{'aftr'}.'<br />'.
-                        $lt{'thes'}.'<br />';
+                        '<p class="LC_info">'.
+                        &mt('You are about to sign-up for the [_1]Mechanics Online[_2] course.','<em>','</em>').'<br />'.
+                        $lt{'plse'}.'</p><ul>'.
+                        '<li>'.$lt{'inst'}.'</li>'.
+                        '<li>'.$lt{'aftr'}.'</li>'.
+                        '<li>'.$lt{'yous'}.'</li></ul>';
             my $captchaform = &create_recaptcha($pubkey);
             if ($captchaform) {
                 my $submit_text = &mt('Sign-up');
@@ -611,7 +615,7 @@ sub call_rulecheck {
 sub send_token {
     my ($domain,$email,$server,$domdesc,$contact_name,$contact_email,$courseid) = @_;
     my $msg = '<h3>'.&mt('Account creation status').'</h3>'.
-              &mt('Thank you for your request to create a new LON-CAPA account.').
+              &mt('Thank you for your request to create a new Mechanics Online account.').
               '<br /><br />';
     my $now = time;
     my %info = ('ip'         => $ENV{'REMOTE_ADDR'},
@@ -622,12 +626,26 @@ sub send_token {
     my $token = &Apache::lonnet::tmpput(\%info,$server,'createaccount');
     if ($token !~ /^error/ && $token ne 'no_such_host') {
         my $esc_token = &escape($token);
-        my $showtime = localtime(time);
-        my $mailmsg = &mt('A request was submitted on [_1] for creation of a [_2] account.',$showtime,$domdesc)."\n".
-             &mt('To complete this process please open a web browser and enter the following URL in the address/location box: [_1]',
-                 "\n\n".&Apache::lonnet::absolute_url().'/adm/createaccount?token='.$esc_token);
-        my $result = &Apache::resetpw::send_mail($domdesc,$email,$mailmsg,$contact_name,
-                                                 $contact_email);
+        my $mailsubj = &mt('Your Mechanics Online Course Account');
+        my $msgfrom  = &mt('Mechanics Online Course Staff');
+        my $mailmsg =  &mt('Greetings.')."\n\n".
+                       &mt('Thank you for your interest in our Online Mechanics Course.').
+                       ' '.
+                       &mt('In order to complete the registration process, please open the following link in your web browser:').
+                       "\n\n".
+                       &Apache::lonnet::absolute_url().'/adm/createaccount?token='.$esc_token.
+                       "\n\n".
+                       &mt('This link will take you to a sign-up page where you will be asked to provide some general information and finalize the registration process.').
+                       ' '.
+                       &mt('A self-test (for review) is available within the course, for you to test your level of preparation.').
+                       "\n\n".
+                       &mt('Best Regards,').
+                       "\n\n".
+                       &mt('RELATE Group')."\n";
+
+        my $result = &Apache::resetpw::send_mail('MIT',$email,$mailmsg,
+                                                 $msgfrom,$contact_email,
+                                                 $mailsubj);
         if ($result eq 'ok') {
             $msg .= &mt('A message has been sent to the e-mail address you provided.').'<br />'.&mt('The message includes the web address for the link you will use to complete the sign-up process.').'<br />'.&mt("The link included in the message will be valid for the next [_1]two[_2] hours.",'<b>','</b>');
         } else {