Subversion Repositories wimsdev

Rev

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

Rev 10454 Rev 15233
Line 4... Line 4...
4
!if $cn_ident=$empty
4
!if $cn_ident=$empty
5
 !debug missing_ident
5
  !debug missing_ident
6
!endif
6
!endif
7
 
7
 
8
ident_type=
8
ident_type=
9
ident_type=!defof ident_type in wimshome/log/classes/.connections/$cn_ident
9
ident_type=!defof ident_type in wimshome/log/classes/.connections/$cn_ident
10
!! readdef seems not to be working ??
10
!! readdef seems not to be working ??
11
!! !readdef wimshome/log/classes/.connections/$cn_ident
11
!! !readdef wimshome/log/classes/.connections/$cn_ident
12
!if $ident_type=$empty
12
!if $ident_type=$empty
13
 !debug bad ident: $cn_ident
13
  !debug bad ident: $cn_ident
14
!endif
14
!endif
15
 
15
 
16
!read adm/connect/$ident_type
16
!read adm/connect/$ident_type
17
 
17
 
18
!if $cn_status notsametext OK
18
!if $cn_status notsametext OK
19
 connect_error=$cn_data
19
  connect_error=$cn_data
20
 !exit
20
  !exit
21
!endif
21
!endif
22
 
22
 
23
cn_data=!nonempty lines $cn_data
23
cn_data=!nonempty lines $cn_data
24
datacnt=!linecnt $cn_data
24
datacnt=!linecnt $cn_data
25
!if $cn_sync=yes and $wims_class>0 and $wims_user=supervisor
25
!if $cn_sync=yes and $wims_class>0 and $wims_user=supervisor
26
 !read adm/connect/.sync/$cn_method
26
  !read adm/connect/.sync/$cn_method
27
!endif
27
!endif
28
 
28