Subversion Repositories wimsdev

Rev

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

Rev 12957 Rev 13828
Line 49... Line 49...
49 
 
 49 
 
50 
test=!defof class_connections in $classdeffile
 50 
test=!defof class_connections in $classdeffile
51 
test=!items2words $test
 51 
test=!items2words $test
52 
test1=!translate internal +,; to $   $ in $test
 52 
test1=!translate internal +,; to $   $ in $test
53 
!if $ident/$rclass notwordof $test1
 53 
!if $ident/$rclass notwordof $test1
54 
 error=connection refused by requested class ($qclass) ($ident/$rclass)
 54 
  error=connection refused by requested class ($qclass)
55 
 !exit
 55 
  !exit
56 
!endif
 56 
!endif
57 
 
 57 
 
58 
!if $job iswordof modclass delclass adduser moduser deluser recuser \
 58 
!if $job iswordof modclass delclass adduser moduser deluser recuser \
59 
  putcsv update and\
 59 
  putcsv update and\
60 
  ($ident/$rclass+ notwordof $test and +$ident/$rclass+ notwordof $test)
 60 
  ($ident/$rclass+ notwordof $test and +$ident/$rclass+ notwordof $test)