Rev 16512 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
16479 | guerimand | 1 | !read adm/class/classlang names.phtml |
2 | |||
17089 | guerimand | 3 | !! --- disconnect for example class |
4 | !if $wims_class<10000 |
||
5 | error=closedmodexcls |
||
6 | !reset job |
||
7 | !exit |
||
8 | !endif |
||
9 | |||
16512 | guerimand | 10 | !if $wims_user!=supervisor |
11 | job=oneuser |
||
12 | !if $error=$empty |
||
13 | !changeto $job.proc |
||
14 | !endif |
||
15 | !endif |
||
16 | |||
17 | !if $error isitemof notsupervisor,noclass,nosupervisoremail,sendmailteacherclose |
||
16479 | guerimand | 18 | !reset job |
19 | !exit |
||
20 | !endif |
||
21 | |||
16512 | guerimand | 22 | !if $nb_user=0 and $wims_user=supervisor |
23 | error=nouser |
||
16479 | guerimand | 24 | !reset job |
25 | !exit |
||
26 | !endif |
||
27 | |||
16512 | guerimand | 28 | |
16479 | guerimand | 29 | !if $cmd!=reply and $job=sendmail |
30 | !reset job |
||
31 | !endif |
||
32 | |||
16482 | guerimand | 33 | !if $cmd=new |
34 | !distribute item 1,1 into selfsend,sendotherteacher |
||
35 | !endif |
||
36 | |||
16479 | guerimand | 37 | !bound job within edit,preview,sendmail default edit |
38 | |||
39 | !readproc adm/vfilter/listvarfilter.proc |
||
40 | !if $varfilterclear!=$empty |
||
41 | job=edit |
||
42 | !endif |
||
43 | !readproc adm/vfilter/varfilter proc |
||
44 | |||
45 | !read $job.proc |