Subversion Repositories wimsdev

Rev

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

Rev 10757 Rev 10799
Line 2... Line 2...
2
wims_prefix=class user livret
2
wims_prefix=class user livret
3
!if $wims_user=supervisor
3
!if $wims_user=supervisor
4
 !readproc adm/whoconnect
4
 !readproc adm/whoconnect
5
!endif
5
!endif
6
 
6
 
7
!if $wims_class=$empty or ($wims_supertype!=0 and\
7
!if $wims_class=$empty or ($wims_supertype!=0 and \
8
 ($wims_supertype!=2 or $wims_typename!=class) and\
8
 ($wims_supertype!=2 or $wims_typename!=class)) and\
9
 ($wims_supertype!=4 or ($wims_typename notwordof course and /0// notin $wims_class//))
9
 ($wims_supertype!=4 or ($wims_typename notwordof course and /0// notin $wims_class//))
10
 error=bad_class
10
 error=bad_class
11
 !exit
11
 !exit
12
!endif
12
!endif
13
 
13