Subversion Repositories wimsdev

Rev

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

Rev 10770 Rev 10793
Line 35... Line 35...
35
!!!let compsup=!sh echo "$compsup" | sort | uniq;
35
!!!let compsup=!sh echo "$compsup" | sort | uniq;
36
 
36
 
37
!!!read adm/class/graphclass supervise\
37
!!!read adm/class/graphclass supervise\
38
!!$compsup
38
!!$compsup
39
!reset compsup
39
!reset compsup
-
 
40
!if $directcnt=0
-
 
41
  !goto enter
40
 
42
!endif
41
$name_direct:
43
$name_direct:
42
 
44
 
43
!!!if / isin $user_participate_
45
!!!if / isin $user_participate_
44
!! !for cls in $user_participate_
46
!! !for cls in $user_participate_
45
!!  !if $wims_class isin $cls
47
!!  !if $wims_class isin $cls
Line 65... Line 67...
65
 !if $wims_user=supervisor
67
 !if $wims_user=supervisor
66
  $name_text2
68
  $name_text2
67
 !else
69
 !else
68
  $name_noaccount
70
  $name_noaccount
69
 !endif
71
 !endif
70
!endif
72
!endif directcnt>0
71
</div>
73
</div>