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
 
-