1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
!set prog=$wims_read_parm
!set courses=!record 0 of wimshome/log/classes/$prog/courses
!set courses=!column 1 of $courses
!if $courses=$empty
!exit
!endif
!reset courses_right
!for cours in $courses
!if $wims_superclass/$cours isitemof $(user_$(statut)_) or $wims_realuser=supervisor
!set courses_right=!append item $cours to $courses_right
!endif
!next
!if $courses_right=$empty
!exit
!endif
!for cours in $courses_right
!let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$wims_superclass/$cours/.def
<li class="inline"><span class="wims_classes_direct_course">
!if $statut=supervise
!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$cours&auth_user=supervisor $(don[2])
!else
!href module=adm/class/classes&type=authparticipant&class=$wims_superclass/$cours&auth_user=$u_ $(don[2])
!endif
</span></li>
!next
|
