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)