Subversion Repositories wimsdev

Rev

Rev 10600 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
parent=level
2
!if $cancel!=$empty or $del=$empty
12617 bpr 3
  job=level
4
  !changeto jobs/$job.proc
23 reyssat 5
!endif
6
 
7
!readdef $classdir1/$del/.def
8
 
9
!if $confirm=$empty or $class_recshare=main
12617 bpr 10
  !exit
23 reyssat 11
!endif
12
 
13
!read adm/gateway/delprog $del
14
!read adm/gateway/mkindex
15
 
16
confirm=
17
job=level
18
!changeto jobs/$job.proc