Rev 12981 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 12981 | Rev 14336 | ||
---|---|---|---|
Line 24... | Line 24... | ||
24 | basedirr2=$wims_home/log/classes/$uclass |
24 | basedirr2=$wims_home/log/classes/$uclass |
25 | basedir0=wimshome/log/classes |
25 | basedir0=wimshome/log/classes |
26 | basedir02=$wims_home/log/classes |
26 | basedir02=$wims_home/log/classes |
27 | 27 | ||
28 | tlist=!sh cd $basedir2/.users\ |
28 | tlist=!sh cd $basedir2/.users\ |
29 |
|
29 | grep -l user_supervisable=yes * |
30 | tlist=!words2items $tlist |
30 | tlist=!words2items $tlist |
31 | !set tmp= |
31 | !set tmp= |
32 | !writefile $basedirr/.teacherlist.1 |
32 | !writefile $basedirr/.teacherlist.1 |
33 | !writefile $basedirr/.teacherlist_external.1 |
33 | !writefile $basedirr/.teacherlist_external.1 |
34 | !for t in $tlist |
34 | !for t in $tlist |
Line 54... | Line 54... | ||
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 |
|
59 | !sh sort -f $basedir02/$t/.teacherlist.1 | uniq | grep . >$basedir02/$t/.teacherlist\ |
60 |
|
60 | rm -f $basedir02/$t/.teacherlist.1 >/dev/null |
61 |
|
61 | !sh [ -f $basedir02/$t/.teacherlist_external.1 ] && sort -f $basedir02/$t/.teacherlist_external.1 | uniq | grep . >$basedir02/$t/.teacherlist_external\ |
62 | rm -f $basedir02/$t/.teacherlist_external.1 >/dev/null |
62 | rm -f $basedir02/$t/.teacherlist_external.1 >/dev/null |
63 | !next |
63 | !next |
64 | 64 | ||
65 | !reset tmp |
65 | !reset tmp |