Subversion Repositories wimsdev

Rev

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

Rev 16131 Rev 16190
Line 5... Line 5...
5 
!set class=$wims_read_parm
 5 
!set class=$wims_read_parm
6 
!if $class_typename=course
 6 
!if $class_typename=course
7 
  !let data=!replace internal / by , in $class
 7 
  !let data=!replace internal / by , in $class
8 
  !let courses=$(data[2])/$(data[3])/$(data[4])
 8 
  !let courses=$(data[2])/$(data[3])/$(data[4])
9 
  !let list_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
 9 
  !let list_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
- 
 
 10 
  !let statut=supervise
10 
!else
 11 
!else
11 
  !set courses=!record 0 of wimshome/log/classes/$class/courses
 12 
  !set courses=!record 0 of wimshome/log/classes/$class/courses
12 
  !set courses=!column 1 of $courses
 13 
  !set courses=!column 1 of $courses
13 
!endif
 14 
!endif
14 
!if $courses=$empty
 15 
!if $courses=$empty