Rev 10189 | Rev 12337 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 10189 | Rev 11978 | ||
---|---|---|---|
Line 2... | Line 2... | ||
2 | max_defaffi=10 |
2 | max_defaffi=10 |
3 | 3 | ||
4 | !if ($wims_supertype<3 and $wims_typename=class) or ($wims_supertype=4 and $wims_typename=course) |
4 | !if ($wims_supertype<3 and $wims_typename=class) or ($wims_supertype=4 and $wims_typename=course) |
5 | cdt_supervise=yes |
5 | cdt_supervise=yes |
6 | !readdef wimshome/log/classes/$wims_class/cdt/.def |
6 | !readdef wimshome/log/classes/$wims_class/cdt/.def |
- | 7 | !if $cdt_hide=yes |
|
- | 8 | hiddenlist=$wims_class |
|
- | 9 | !endif |
|
7 | !if $cdt_defined!=yes |
10 | !if $cdt_defined!=yes |
8 | !sh mkdir -p $wims_home/log/classes/$wims_class/cdt/def;\ |
11 | !sh mkdir -p $wims_home/log/classes/$wims_class/cdt/def;\ |
9 | mkdir -p $wims_home/log/classes/$wims_class/cdt/src;\ |
12 | mkdir -p $wims_home/log/classes/$wims_class/cdt/src;\ |
10 | mkdir -p $wims_home/log/classes/$wims_class/cdt/files; |
13 | mkdir -p $wims_home/log/classes/$wims_class/cdt/files; |
11 | !filewrite wimshome/log/classes/$wims_class/cdt/.def !set cdt_title=$wims_name_cdt\ |
14 | !filewrite wimshome/log/classes/$wims_class/cdt/.def !set cdt_title=$wims_name_cdt\ |
12 | !set cdt_description=$empty\ |
15 | !set cdt_description=$empty\ |
13 | !set cdt_defined=yes\ |
16 | !set cdt_defined=yes\ |
14 | !set cdt_nbdate=0\ |
17 | !set cdt_nbdate=0\ |
15 | !set cdt_ltmonth=$empty |
18 | !set cdt_ltmonth=$empty |
16 | !set cdt_title=$wims_name_cdt |
19 | !set cdt_title=$wims_name_cdt |
17 | !set cdt_description=$empty |
20 | !set cdt_description=$empty |
18 | !set cdt_defined=yes |
21 | !set cdt_defined=yes |
19 | !set cdt_nbdate=0 |
22 | !set cdt_nbdate=0 |
20 | !set cdt_ltmonth=$empty |
23 | !set cdt_ltmonth=$empty |
Line 68... | Line 71... | ||
68 | nbdate=$[$cdt_nbdate+$nbdate] |
71 | nbdate=$[$cdt_nbdate+$nbdate] |
69 | nbmonth=!listunion $nbmonth and $cdt_ltmonth |
72 | nbmonth=!listunion $nbmonth and $cdt_ltmonth |
70 | !next prog |
73 | !next prog |
71 | cdt_nbdate=$nbdate |
74 | cdt_nbdate=$nbdate |
72 | cdt_nbmonth=$nbmonth |
75 | cdt_nbmonth=$nbmonth |
73 |
|
76 | !reset ltcourses hiddenlist |
74 | !for cl in $courses |
77 | !for cl in $courses |
- | 78 | test=!defof cdt_hide in wimshome/log/classes/$wims_superclass/$cl/cdt/.def |
|
- | 79 | !if $test!=yes |
|
75 | tmp=!replace internal / by , in $cl |
80 | tmp=!replace internal / by , in $cl |
76 | tmp=!item -1 of $tmp |
81 | tmp=!item -1 of $tmp |
77 | ltcourses=!append word $tmp to $ltcourses |
82 | ltcourses=!append word $tmp to $ltcourses |
- | 83 | !else |
|
- | 84 | hiddenlist=!append item $cl to $hiddenlist |
|
- | 85 | !endif |
|
78 | !next cl |
86 | !next cl |
79 | !sh cd $wims_home/$wims_sesdir;\ |
87 | !sh cd $wims_home/$wims_sesdir;\ |
80 | mkdir -p getfile\ |
88 | mkdir -p getfile\ |
81 | cd getfile\ |
89 | cd getfile\ |
82 | rm -rf cdt\ |
90 | rm -rf cdt\ |