Subversion Repositories wimsdev

Rev

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

Rev 9506 Rev 10747
Line 12... Line 12...
12 
!if $wims_user=supervisor
 12 
!if $wims_user=supervisor
13 
 nam=sup
 13 
 nam=sup
14 
!else
 14 
!else
15 
 nam=part
 15 
 nam=part
16 
!endif
 16 
!endif
17 
!read adm/class/userdef classes,$wims_class,$wims_user
 17 
!read adm/class/userdef classes,$wims_class,$wims_realuser
- 
 
 18 
!set user_supervisable=!defof user_supervisable in $userdef
- 
 
 19 
!if $user_supervisable=yes
- 
 
 20 
  !set user_supervise=!defof user_supervise in $userdef
- 
 
 21 
!endif
- 
 
 22 
if $wims_user=supervisor
- 
 
 23 
  !set user_supervise=!append item $wims_class to $user_supervise
- 
 
 24 
!endif
- 
 
 25 
!set user_participate=!defof user_participate in $userdef
- 
 
 26 
 
18 
neib=!defof n_$nam in wimshome/log/classes/$wims_class/neighbors
 27 
neib=!defof n_$nam in wimshome/log/classes/$wims_class/neighbors
19 
pass=!defof user_password in $userdef
 28 
pass=!defof user_password in $userdef
20 
pass=!word 1 of $pass
 29 
pass=!word 1 of $pass
21 
 
 30 
 
22 
directlist=
 31 
directlist=