--- loncom/interface/createaccount.pm 2012/02/14 16:04:22 1.40.2.5.2.9 +++ loncom/interface/createaccount.pm 2012/03/02 20:44:25 1.40.2.5.2.13 @@ -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.9 2012/02/14 16:04:22 raeburn Exp $ +# $Id: createaccount.pm,v 1.40.2.5.2.13 2012/03/02 20:44:25 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -102,6 +102,9 @@ sub handler { my ($js,$courseid,$title); if (defined($env{'form.courseid'})) { $courseid = &validate_course($env{'form.courseid'}); + if ($courseid eq 'relate_3H121116c19344ff3relatel1') { + $courseid = 'relate_3e100973b27484f2drelatel1'; + } } if ($courseid ne '') { $js = &catreturn_js(); @@ -611,7 +614,7 @@ sub call_rulecheck { sub send_token { my ($domain,$email,$server,$domdesc,$contact_name,$contact_email,$courseid) = @_; my $msg = '

'.&mt('Account creation status').'

'. - &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.'). '

'; my $now = time; my %info = ('ip' => $ENV{'REMOTE_ADDR'}, @@ -629,13 +632,11 @@ sub send_token { ' '. &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). + &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('The course will begin on March 1st, and until that date, a self-test will be available for you to test your level of preparation for our course.'). - ' '. - &mt('The self-test is an integral part of the course, and should be completed by the March 1st start date.'). + &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".