Subversion Repositories wimsdev

Rev

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

Rev 17179 Rev 17506
Line 16... Line 16...
16 
!!endif
 16 
!!endif
17 
!set icourses=!record 0 of wimshome/log/classes/$wims_class/icourses
 17 
!set icourses=!record 0 of wimshome/log/classes/$wims_class/icourses
18 
!set icoursecnt=!linecnt $icourses
 18 
!set icoursecnt=!linecnt $icourses
19 
 
 19 
 
20 
!let user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
 20 
!let user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
21 
!if $wims_user=supervisor and $wims_realuser=supervisor
 21 
!if $wims_user=supervisor and ($wims_realuser=supervisor or $wims_realuser=SUPERVISOR)
22 
  !set user_supervise=!column 1 of $levels\
 22 
  !set user_supervise=!column 1 of $levels\
23 
$classes\
 23 
$classes\
24 
$progs\
 24 
$progs\
25 
$courses\
 25 
$courses\
26 
$icourses
 26 
$icourses