Subversion Repositories wimsdev

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
 
2
parent=gateway
3
!if $cancel!=$empty
4
 job=first
5
 !changeto jobs/$job.proc
6
!endif
7
 
8
!if $confirm=$empty
9
 pass=!defof class_password in $classdir1/.def
10
 passs=!defof user_password in $classdir1/supervisor
11
 !read adm/class/levelname.phtml.$class_lang
12
 !exit
13
!endif
14
 
15
title=!trim $title
16
title=!replace internal , by , in $title
17
!if $title=$empty
18
 error=empty_data
19
 !exit
20
!endif
21
 
22
!read adm/gateway/addlevel $sup,$title
23
 
24
!if $error!=$empty
25
 !exit
26
!endif
27
 
28
!read adm/gateway/mkindex
29
!reset title,sup,passs,alevel
30
job=first
31
!changeto jobs/$job.proc
32