Subversion Repositories wimsdev

Rev

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

Rev 15290 Rev 15324
Line 357... Line 357...
357
  exist2=!defof user_exists in $userdef2
357
  exist2=!defof user_exists in $userdef2
358
  stest=!defof class_superclass in wimshome/log/classes/$class/.def
358
  stest=!defof class_superclass in wimshome/log/classes/$class/.def
359
  !if $exist1!=$empty and $stest!=$empty
359
  !if $exist1!=$empty and $stest!=$empty
360
    ptest=!defof user_password in $userdef
360
    ptest=!defof user_password in $userdef
361
    ctest=!defof user_participate in $userdef
361
    ctest=!defof user_participate in $userdef
-
 
362
    !!ptest should be already crypted
362
    ptest1=!passcrypt $ptest
363
    ptest1=!passcrypt $ptest
363
    ptest2=!passcrypt $pass
364
    pass_check=!passcheck $pass and $ptest1
364
    !if $ptest2 iswordof $ptest1
365
    !if $pass_check=yes
365
      ctest=!append item $class to $ctest
366
      ctest=!append item $class to $ctest
366
      ctest=!listuniq $ctest
367
      ctest=!listuniq $ctest
367
      !setdef !set user_participate=$ctest in $userdef
368
      !setdef !set user_participate=$ctest in $userdef
368
      step=3
369
      step=3
369
      !goto endreg
370
      !goto endreg