Subversion Repositories wimsdev

!if $datacnt<1

 !exit

!endif

!if $cn_user=supervisor

 deffile=supervisor

!else

 deffile=.users/$cn_user

!endif               

deffile=classes/$wims_class/$deffile

!if user notwordof $wims_prefix

 wims_prefix=$wims_prefix user

!endif

!readdef $deffile

!for i=1 to $datacnt

 l_=!line $i of $cn_data

 l_=!translate = to $\

$ in $l_

 !distribute lines $l_ into n_,v_

 !if $n_ iswordof lastname firstname password email comments regnum photourl external_auth\

	and $v_!=$(user_$n_)

  !setdef !set user_$n_=$v_ in $deffile

 !endif

!next i