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

Diff for /loncom/interface/Attic/londropadd.pm between versions 1.96 and 1.97

version 1.96, 2003/12/27 23:38:13 version 1.97, 2003/12/28 01:30:50
Line 263  sub javascript_validations { Line 263  sub javascript_validations {
     my $function_name =(<<END);      my $function_name =(<<END);
 function verify_message (vf,founduname,foundpwd,foundname,foundid,foundsec,foundemail) {  function verify_message (vf,founduname,foundpwd,foundname,foundid,foundsec,foundemail) {
 END  END
     my $auth_checks = (<<END);      my $auth_checks;
     var foundatype=0;  
 END  
     if ($mode eq 'createcourse') {      if ($mode eq 'createcourse') {
         $auth_checks .= (<<END);          $auth_checks .= (<<END);
     if (document.ccrs.autoadds[0].checked == true) {      if (vf.autoadds[0].checked == true) {
         if (current.radiovalue == null || current.radiovalue == 'nochange') {          if (current.radiovalue == null || current.radiovalue == 'nochange') {
             alert('$alert{'authen'}');              alert('$alert{'authen'}');
             return;              return;
Line 277  END Line 275  END
 END  END
     } else {      } else {
         $auth_checks .= (<<END);          $auth_checks .= (<<END);
       var foundatype=0;
     if (founduname==0) {      if (founduname==0) {
  alert('$alert{'username'}');   alert('$alert{'username'}');
         return;          return;
Line 289  END Line 288  END
     }      }
 END  END
     }      }
     if ( ($mode eq 'createcourse') || ($mode eq 'modifycourse') ) {      if ($mode eq 'createcourse') {
         $auth_checks .= "          $auth_checks .= "
     foundatype=1";      if ( (vf.autoadds[0].checked == true) &&
         if ($mode eq 'createcourse') {           (vf.elements[current.argfield].value == null || vf.elements[current.argfield].value == '') ) {
             $auth_checks .= "  ";
     if ( (document.ccrs.autoadds[0].checked == true) &&      } elsif ($mode eq 'modifycourse') {
          (document.ccrs.elements[current.argfield].value == null || document.ccrs.elements[current.argfield].value == '') ) {";          $auth_checks .= " 
         } elsif ($mode eq 'modifycourse') {      if (vf.elements[current.argfield].value == null || vf.elements[current.argfield].value == '') {
             $auth_checks .= "   ";
     if (document.ccrs.elements[current.argfield].value == null || document.cmod.elements[current.argfield].value == '') }";      }
         }      if ( ($mode eq 'createcourse') || ($mode eq 'modifycourse') ) {
         $auth_checks .= (<<END);          $auth_checks .= (<<END);
             var alertmsg = '';          var alertmsg = '';
             switch (current.radiovalue) {          switch (current.radiovalue) {
                 case 'krb':              case 'krb':
                     alertmsg = '$alert{'krb'}';                  alertmsg = '$alert{'krb'}';
                     break;                  break;
                 default:              default:
                     alertmsg = '';                  alertmsg = '';
             }          }
             if (alertmsg != '') {          if (alertmsg != '') {
                 alert(alertmsg);              alert(alertmsg);
                 return;              return;
             }  
         }          }
     }      }
 END  END
Removed from v.1.96  
changed lines
  Added in v.1.97

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