[BACK]Return to createaccount.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/createaccount.pm between versions 1.69 and 1.70

version 1.69, 2015/01/09 15:41:49 version 1.70, 2015/06/09 21:22:55
Line 389  sub javascript_setforms { Line 389  sub javascript_setforms {
     }      }
     if (@required) {      if (@required) {
         my $missprompt = &mt('One or more required fields are currently blank.');          my $missprompt = &mt('One or more required fields are currently blank.');
           &js_escape(\$missprompt);
         my $reqstr = join("','",@required);          my $reqstr = join("','",@required);
         $requiredchk = <<"ENDCHK";          $requiredchk = <<"ENDCHK";
                 var requiredfields = new Array('$reqstr');                  var requiredfields = new Array('$reqstr');
Line 452  ENDSCRIPT Line 453  ENDSCRIPT
 sub javascript_checkpass {  sub javascript_checkpass {
     my ($now,$context) = @_;      my ($now,$context) = @_;
     my $nopass = &mt('You must enter a password.');      my $nopass = &mt('You must enter a password.');
     my $mismatchpass = &mt('The passwords you entered did not match.').'\\n'.      my $mismatchpass = &mt('The passwords you entered did not match.')."\n".
                        &mt('Please try again.');                          &mt('Please try again.'); 
       &js_escape(\$nopass);
       &js_escape(\$mismatchpass);
     my $js = <<"ENDSCRIPT";      my $js = <<"ENDSCRIPT";
 <script type="text/javascript">  <script type="text/javascript">
 // <![CDATA[  // <![CDATA[
Line 487  ENDSCRIPT Line 490  ENDSCRIPT
 }  }
   
 sub javascript_validmail {  sub javascript_validmail {
     my %lt = &Apache::lonlocal::texthash (      my %js_lt = &Apache::lonlocal::texthash (
                email => 'The e-mail address you entered',                 email => 'The e-mail address you entered',
                notv  => 'is not a valid e-mail address',                 notv  => 'is not a valid e-mail address',
     );      );
     my $output =  "\n".'<script type="text/javascript">'."\n".      my $output =  "\n".'<script type="text/javascript">'."\n".
                   '// <![CDATA['."\n".                    '// <![CDATA['."\n".
                   &Apache::lonhtmlcommon::javascript_valid_email()."\n";                    &Apache::lonhtmlcommon::javascript_valid_email()."\n";
       &js_escape(\%js_lt);
     $output .= <<"ENDSCRIPT";      $output .= <<"ENDSCRIPT";
 function validate_email(client) {  function validate_email(client) {
     field = client.uname;      field = client.uname;
     if (validmail(field) == false) {      if (validmail(field) == false) {
         alert("$lt{'email'}: "+field.value+" $lt{'notv'}.");          alert("$js_lt{'email'}: "+field.value+" $js_lt{'notv'}.");
         return false;          return false;
     }      }
     return true;      return true;
Removed from v.1.69  
changed lines
  Added in v.1.70

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>