Subversion Repositories wimsdev

Rev

Rev 12895 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12895 Rev 14336
Line 53... Line 53...
53 
n_part in wimshome/log/classes/$as_2/neighbors
 53 
n_part in wimshome/log/classes/$as_2/neighbors
54 
!distribute lines $as_n1 into as_nsup1,as_npart1
 54 
!distribute lines $as_n1 into as_nsup1,as_npart1
55 
!distribute lines $as_n2 into as_nsup2,as_npart2
 55 
!distribute lines $as_n2 into as_nsup2,as_npart2
56 
as_test=!listcomplement user in $as_l
 56 
as_test=!listcomplement user in $as_l
57 
!if ($as_test!=$empty and \
 57 
!if ($as_test!=$empty and \
58 
	  ($as_2 notitemof $as_nsup1 or $as_1 notitemof $as_nsup2)) or \
 58 
    ($as_2 notitemof $as_nsup1 or $as_1 notitemof $as_nsup2)) or \
59 
    (user isitemof $as_l and \
 59 
    (user isitemof $as_l and \
60 
	  ($as_2 notitemof $as_npart1 or $as_1 notitemof $as_npart2))
 60 
    ($as_2 notitemof $as_npart1 or $as_1 notitemof $as_npart2))
61 
  error=addshare_noright
 61 
  error=addshare_noright
62 
  !exit
 62 
  !exit
63 
!endif
 63 
!endif
64 
 
 64 
 
65 
1_=!translate internal / to , in $as_1
 65 
1_=!translate internal / to , in $as_1