Subversion Repositories wimsdev

Rev

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

Rev 15259 Rev 15959
Line 1... Line 1...
1
!! wims_read_parm = name of the variable to fill
1
!! wims_read_parm = name of the variable to fill
2
!!by default  wims_rm_0
2
!!by default  wims_rm_0
3
!set tmpvar=!word 1 of $wims_read_parm
3
!set tmpvar=!word 1 of $wims_read_parm
4
!default tmpvar=wims_rm_0
4
!default tmpvar=wims_rm_0
5
 
5
 
6
!if $class_typename=class
6
!if $class_typename isitemof class,course,portal
7
  !set tmp_cl=$wims_superclass
7
  !set tmp_cl=$wims_superclass
8
  !default tmp_cl=$wims_class
8
  !default tmp_cl=$wims_class
9
  !set tmp=!defof class_authidp in wimshome/log/classes/$tmp_cl/.def
9
  !set tmp=!defof class_authidp in wimshome/log/classes/$tmp_cl/.def
10
  !set tmp=$(tmp[2;])
10
  !set tmp=$(tmp[2;])
11
  !if $tmp issametext $empty
11
  !if $tmp issametext $empty