Subversion Repositories wimsdev

Rev

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

Rev 4820 Rev 5755
Line 2... Line 2...
2
!if $wims_superclass=$empty
2
!if $wims_superclass=$empty
3
  !let wims_superclass=$wims_class
3
  !let wims_superclass=$wims_class
4
!endif
4
!endif
5
!let user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_user
5
!let user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_user
6
!! ----------- definition des droits de connexion supervisor
6
!! ----------- definition des droits de connexion supervisor
7
<br>
7
<br/>
8
!let compsup=$empty
8
!let compsup=$empty
9
!for cls in $user_supervise
9
!for cls in $user_supervise
10
 !let tmp=!replace internal / by , in $cls
10
 !let tmp=!replace internal / by , in $cls
11
 !let nb=!itemcnt $tmp
11
 !let nb=!itemcnt $tmp
12
 !for l=2 to $nb
12
 !for l=2 to $nb