Rev 16190 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 16190 | Rev 16778 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !! file to add link |
1 | !! file to add link |
2 | !! - from class level to all program in portal |
2 | !! - from class level to all program in portal |
3 | !! - from course level to the program of the course |
3 | !! - from course level to the program of the course |
4 | 4 | ||
5 | !set class=$wims_read_parm |
5 | !set class=$wims_read_parm |
- | 6 | !! --------- not use in zonetest of program |
|
- | 7 | !set test=!replace internal / by , in $class |
|
- | 8 | !if $(test[-1])=0 |
|
- | 9 | !exit |
|
- | 10 | !endif |
|
6 | !if $class_typename=course |
11 | !if $class_typename=course |
7 | !let data=!replace internal / by , in $class |
12 | !let data=!replace internal / by , in $class |
8 | !let courses=$(data[2])/$(data[3])/$(data[4]) |
13 | !let courses=$(data[2])/$(data[3])/$(data[4]) |
9 | !let list_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser |
14 | !let list_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser |
10 | !let statut=supervise |
15 | !let statut=supervise |