Subversion Repositories wimsdev

Rev

Rev 16539 | Rev 16617 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16539 Rev 16615
Line 419... Line 419...
419 
    up_email=$email
 419 
    up_email=$email
420 
    !if $regvars_cnt>0
 420 
    !if $regvars_cnt>0
421 
      !for j=1 to $regvars_cnt
 421 
      !for j=1 to $regvars_cnt
422 
        up_regprop$j=!detag $(regprop$j)
 422 
        up_regprop$j=!detag $(regprop$j)
423 
      !next j
 423 
      !next j
- 
 
 424 
    !endif
- 
 
 425 
    !if $wims_user=supervisor
- 
 
 426 
      up_forcechpwd=yes
424 
    !endif
 427 
    !endif
425 
  !else
 428 
  !else
426 
    !read adm/class/idp_$idp_method
 429 
    !read adm/class/idp_$idp_method
427 
    firstn=$up_firstname
 430 
    firstn=$up_firstname
428 
    lastn=$up_lastname
 431 
    lastn=$up_lastname