Rev 10985 | Rev 14336 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 10985 | Rev 12981 | ||
---|---|---|---|
Line 10... | Line 10... | ||
10 | !!! je ne comprends pas : l'indexation ne se fait pas sinon lorsqu'un enseignant s'inscrit |
10 | !!! je ne comprends pas : l'indexation ne se fait pas sinon lorsqu'un enseignant s'inscrit |
11 | !default superclass=$uclass |
11 | !default superclass=$uclass |
12 | !default wims_superclass=$class |
12 | !default wims_superclass=$class |
13 | !!! |
13 | !!! |
14 | !if $superclass=$empty |
14 | !if $superclass=$empty |
15 | !exit |
15 | !exit |
16 | !endif |
16 | !endif |
17 | !if $wims_superclass!=$empty and $superclass!=$wims_superclass and $wims_ismanager<2 |
17 | !if $wims_superclass!=$empty and $superclass!=$wims_superclass and $wims_ismanager<2 |
18 | !exit |
18 | !exit |
19 | !endif |
19 | !endif |
20 | 20 | ||
21 | basedir=wimshome/log/classes/$superclass |
21 | basedir=wimshome/log/classes/$superclass |
22 | basedir2=$wims_home/log/classes/$superclass |
22 | basedir2=$wims_home/log/classes/$superclass |
23 | basedirr=wimshome/log/classes/$uclass |
23 | basedirr=wimshome/log/classes/$uclass |
Line 33... | Line 33... | ||
33 | !writefile $basedirr/.teacherlist_external.1 |
33 | !writefile $basedirr/.teacherlist_external.1 |
34 | !for t in $tlist |
34 | !for t in $tlist |
35 | US_=!defof user_supervise in $basedir/.users/$t |
35 | US_=!defof user_supervise in $basedir/.users/$t |
36 | EXT_=!defof user_external_auth in $basedir/.users/$t |
36 | EXT_=!defof user_external_auth in $basedir/.users/$t |
37 | !if $superclass=$uclass or $uclass isitemof $US_ |
37 | !if $superclass=$uclass or $uclass isitemof $US_ |
38 | U_=!defof user_lastname,user_firstname in $basedir/.users/$t |
38 | U_=!defof user_lastname,user_firstname in $basedir/.users/$t |
39 | !appendfile $basedirr/.teacherlist.1 $U_,$t |
39 | !appendfile $basedirr/.teacherlist.1 $U_,$t |
40 | !if $EXT_!=$empty |
40 | !if $EXT_!=$empty |
41 | !appendfile $basedirr/.teacherlist_external.1 $EXT_:$t |
41 | !appendfile $basedirr/.teacherlist_external.1 $EXT_:$t |
42 | !endif |
42 | !endif |
43 | !for l in $US_ |
43 | !for l in $US_ |
44 | !!teacherlist has not the same status in the superclass (every teacher) |
44 | !!teacherlist has not the same status in the superclass (every teacher) |
45 | !! and in the subclasses (supervise teachers ) |
45 | !! and in the subclasses (supervise teachers ) |
46 | !if $l notwordof $superclass $uclass |
46 | !if $l notwordof $superclass $uclass |
47 | !appendfile $basedir0/$l/.teacherlist.1 $U_,$t |
47 | !appendfile $basedir0/$l/.teacherlist.1 $U_,$t |
48 | !if $EXT_!=$empty |
48 | !if $EXT_!=$empty |
49 | !appendfile $basedir0/$l/.teacherlist_external.1 $EXT_:$t |
49 | !appendfile $basedir0/$l/.teacherlist_external.1 $EXT_:$t |
50 | !endif |
50 | !endif |
51 | !set tmp=!append item $l to $tmp |
51 | !set tmp=!append item $l to $tmp |
52 | !endif |
52 | !endif |
53 | !next |
53 | !next |
54 | !endif |
54 | !endif |
55 | !next t |
55 | !next t |
56 | !set tmp=!listuniq $tmp,$uclass |
56 | !set tmp=!listuniq $tmp,$uclass |
57 | !set tmp=!nonempty items $tmp |
57 | !set tmp=!nonempty items $tmp |
58 | !for t in $tmp |
58 | !for t in $tmp |
59 | !sh sort -f $basedir02/$t/.teacherlist.1 | uniq | grep . >$basedir02/$t/.teacherlist\ |
59 | !sh sort -f $basedir02/$t/.teacherlist.1 | uniq | grep . >$basedir02/$t/.teacherlist\ |