Subversion Repositories wimsdev

Rev

Rev 9598 | Rev 11978 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9598 Rev 10189
Line 22... Line 22...
22 
 !if / isin $wims_class
 22 
 !if / isin $wims_class
23 
  part1=!replace internal / by , in $wims_class
 23 
  part1=!replace internal / by , in $wims_class
24 
  part2=!item -1 of $part1
 24 
  part2=!item -1 of $part1
25 
  part1=!item 1 to -2 of $part1
 25 
  part1=!item 1 to -2 of $part1
26 
  part1=!replace internal , by / in $part1
 26 
  part1=!replace internal , by / in $part1
27 
  part1=!nospace $part1
27 
  part1=!nospace $part1
28 
  !sh cd $wims_home/$wims_sesdir;\
 28 
  !sh cd $wims_home/$wims_sesdir;\
29 
   mkdir -p getfile;\
 29 
   mkdir -p getfile;\
30 
   cd getfile;\
 30 
   cd getfile;\
31 
   rm -rf cdt;\
 31 
   rm -rf cdt;\
32 
   mkdir -p cdt/$part1;\
 32 
   mkdir -p cdt/$part1;\
Line 45... Line 45...
45 
 cdt_supervise=no
 45 
 cdt_supervise=no
46 
 courses=!record 0 of wimshome/log/classes/$wims_class/courses
 46 
 courses=!record 0 of wimshome/log/classes/$wims_class/courses
47 
 courses=!column 1 of $courses
 47 
 courses=!column 1 of $courses
48 
 nbmonth=0
 48 
 nbmonth=0
49 
 nbdate=0
 49 
 nbdate=0
50 
 !for prog in $courses
50 
 !for prog in $courses
51 
  prog=!text select 0123456789/ in $prog
 51 
  prog=!text select 0123456789/ in $prog
52 
  !readdef wimshome/log/classes/$wims_superclass/$prog/cdt/.def
 52 
  !readdef wimshome/log/classes/$wims_superclass/$prog/cdt/.def
53 
  !if $cdt_defined!=yes
 53 
  !if $cdt_defined!=yes
54 
   !sh mkdir -p $wims_home/log/classes/$wims_superclass/$prog/cdt/def;\
 54 
   !sh mkdir -p $wims_home/log/classes/$wims_superclass/$prog/cdt/def;\
55 
    mkdir -p $wims_home/log/classes/$wims_superclass/$prog/cdt/src;\
 55 
    mkdir -p $wims_home/log/classes/$wims_superclass/$prog/cdt/src;\