Subversion Repositories wimsdev

!! Insert a link to other classes in breadcrumbs.
!if $wims_user=$empty
  !exit
!endif
!if $auth_method isitemof $auth_method_list and ($wims_user!=$wims_realuser)
  !set tmp_=auth
!else
   !reset tmp_
!endif

!if $wims_user!=supervisor
  !goto nosupervisor
!endif
:supervisor
!set superclass_description=!defof class_description in wimshome/log/classes/$wims_superclass/.def
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
  !if $auth_method isitemof $auth_method_list
    !set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)supervisor&auth_user=$ext_login&class=$wims_superclass\
to $wims_ariane
  !else
    !set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)supervisor&class=$wims_superclass\
to $wims_ariane
  !endif
!!else
  !!if $wims_otherclass!=$empty
    !!reset tmp_
    !!set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)supervisor&class=$wims_superclass to $wims_ariane
  !!endif
!endif

!goto subclasses
:nosupervisor

!!if $wims_otherclass!=$empty and $wims_superclass=$wims_class and $tmp_=$empty
  !!set wims_ariane=!append line U_oclass,1,module=adm/class/classes&type=participant to $wims_ariane
!!endif
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
    !if $auth_method isitemof $auth_method_list
       !set superclass_description=!defof class_description in wimshome/log/classes/$wims_superclass/.def
       !set wims_ariane=!append line "$superclass_description",1,module=adm/class/classes&type=$(tmp_)participant&class=$wims_superclass\
to $wims_ariane
    !endif
!endif

:subclasses
!if $wims_superclass!=$empty and $wims_superclass!=$wims_class
  !if / isin $class_parent and $class_type=1
    !set pname=!defof class_description in wimshome/log/classes/$class_parent/.def
    !set wims_ariane=!append line "$pname",1,module=adm/class/classes&type=$(tmp_)supervisor&class=$class_parent\
to $wims_ariane
  !endif
  !set wims_ariane=!append line "$wims_classname",8 to $wims_ariane
 !!else
   !!set superclass_description=!defof class_description in wimshome/log/classes/$wims_superclass/.def
   !!set wims_ariane=!append line "$superclass_description",8 to $wims_ariane
!endif