Subversion Repositories wimsdev

Rev

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

Rev 17386 Rev 17601
Line 227... Line 227...
227 
      subclasses=!words2items $subclasses
 227 
      subclasses=!words2items $subclasses
228 
      subcnt=!recordcnt wimshome/log/classes/$wims_class/.subclasses
 228 
      subcnt=!recordcnt wimshome/log/classes/$wims_class/.subclasses
229 
      subclasscnt=!itemcnt $subclasses
 229 
      subclasscnt=!itemcnt $subclasses
230 
      subclass1=$wims_participate
 230 
      subclass1=$wims_participate
231 
    !endif
 231 
    !endif
- 
 
 232 
    subclass1_=!replace internal $wims_class/ by in $subclass1
232 
    subclass1=!sort items $subclass1
 233 
    subclass1_=!sort numeric items $subclass1_
- 
 
 234 
    subclass1=!makelist $wims_class/x for x in $subclass1_
233 
    subclass2=!listcomplement $subclass1 in $subclasses
 235 
    subclass2=!listcomplement $subclass1 in $subclasses
234 
    !if $class_type iswordof 4 2
 236 
    !if $class_type iswordof 4 2
235 
      subclass3=$wims_supervise
 237 
      subclass3=$wims_supervise
236 
    !endif
 238 
    !endif
237 
    subclasscnt1=!itemcnt $subclass1
 239 
    subclasscnt1=!itemcnt $subclass1
Line 246... Line 248...
246 
    !! swork is always close in example class (protection against bad parameters in example class .def
 248 
    !! swork is always close in example class (protection against bad parameters in example class .def
247 
    swork_open=0
 249 
    swork_open=0
248 
  !else
 250 
  !else
249 
    swork_open=!defof swork_open in wimshome/log/classes/$wims_class/swork/.def
 251 
    swork_open=!defof swork_open in wimshome/log/classes/$wims_class/swork/.def
250 
  !endif
 252 
  !endif
251 
!endif
253 
!endif
252 
!read ./otherclass.proc
 254 
!read ./otherclass.proc
253 
!if $wims_sheet=$empty
 255 
!if $wims_sheet=$empty
254 
  !!! should be on the complete home page
 256 
  !!! should be on the complete home page
255 
  !!distribute items no,no into wims_ariane_self,wims_ariane_home
 257 
  !!distribute items no,no into wims_ariane_self,wims_ariane_home
256 
  !set wims_ariane_self=no
 258 
  !set wims_ariane_self=no