Subversion Repositories wimsdev

vcnt=!defof vcnt in wimshome/log/classes/$wims_class/vote/$vote.votes
src=!replace internal & by & in $vote_src
src=!replace internal < by &lt; in $src

!if $vote_title=$empty
 vdata=!record $vote of $votedir/.votes
 !distribute lines $vdata into bidon,vote_title,vote_option,vote_show,vote_whovoteshow
!endif

!if $reg_model isitemof $vmodellist
 !readproc adm/vfilter/listvarfilter.proc
 !if $tv_listlocal=$empty
    !set error=notechvar
    !reset step
 !endif
 !let listlocalname=!item $tv_listlocal of $tv_listname
 !let tmp=!line $tv_listlocal of $tv_listtechvar
 !let listnumtechvar=!column 3 of $tmp
!! final cmd !readproc models/$reg_model.proc will replace next lines
 !if $reg_model=group
  !readproc models/group.proc
 !else
  !read guided.proc
 !endif
!else
 !reset reg_src
!endif

!!reset reg_src