Subversion Repositories wimsdev

Rev

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

Rev 5369 Rev 10736
Line 48... Line 48...
48 
!for i=1 to $[max($votecnt,$vote)]
 48 
!for i=1 to $[max($votecnt,$vote)]
49 
 !appendfile $votedir/.votes :$(v_$i)
 49 
 !appendfile $votedir/.votes :$(v_$i)
50 
!next i
 50 
!next i
51 
 
 51 
 
52 
!if $reg_src!=$empty and ($vote_status=0 or $mod_numsess>0)
 52 
!if $reg_src!=$empty and ($vote_status=0 or $mod_numsess>0)
- 
 
 53 
!! convert username/code for technical variable
- 
 
 54 
  !readproc adm/vfilter/msgchange.proc write\
- 
 
 55 
$reg_src
53 
 !writefile $votedir/$vote.src $reg_src
 56 
  !writefile $votedir/$vote.src $out_script
- 
 
 57 
!! -----------
54 
 msg2wims_primitives=def define comment draw if for uservar\
 58 
 msg2wims_primitives=def define comment draw if for uservar\
55 
	menu list radio mmenu mlist checkbox textarea
 59 
	menu list radio mmenu mlist checkbox textarea
56 
 !sh cd $wims_home; bin/msg2wims log/$Votedir/$vote.src log/$Votedir/$vote.def
 60 
 !sh cd $wims_home; bin/msg2wims log/$Votedir/$vote.src log/$Votedir/$vote.def
57 
!endif
 61 
!endif
58 
 
 62