Subversion Repositories wimsdev

Rev

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
 ltcourses=$empty
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\