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