Subversion Repositories wimsdev

Rev

Rev 12981 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12981 Rev 14336
Line 27... Line 27...
27 
!for dp_c in $courses
 27 
!for dp_c in $courses
28 
  sharelist=!defof sharing_all in wimshome/log/classes/$wims_superclass/$dp_c/neighbors
 28 
  sharelist=!defof sharing_all in wimshome/log/classes/$wims_superclass/$dp_c/neighbors
29 
  !for dp_C in $sharelist
 29 
  !for dp_C in $sharelist
30 
    !if $dp_C != $prog_
 30 
    !if $dp_C != $prog_
31 
      !read adm/class/stopshare $dp_C,$wims_superclass/$dp_c\
 31 
      !read adm/class/stopshare $dp_C,$wims_superclass/$dp_c\
32 
	      all
 32 
        all
33 
    !endif
 33 
    !endif
34 
  !next dp_C
 34 
  !next dp_C
35 
  error=
 35 
  error=
36 
  !read adm/gateway/delsup $dp_c
 36 
  !read adm/gateway/delsup $dp_c
37 
!next dp_c
 37 
!next dp_c
38 
 
 38 
 
39 
!read adm/gateway/delsup $cls_
 39 
!read adm/gateway/delsup $cls_
40 
courses=!items2words $courses
 40 
courses=!items2words $courses
41 
!sh cd $wims_home/log/classes/$wims_superclass\
 41 
!sh cd $wims_home/log/classes/$wims_superclass\
42 
 rm -Rf $cls_ $courses
 42 
 rm -Rf $cls_ $courses
43 
 
 -