Subversion Repositories wimsdev

!if $vote_status=$empty or \

	($wims_user!=supervisor and $vote_status notwordof 1 2)

 error=bad_vote

 job=home

 !changeto home.proc

!endif

wims_multiexec=pari maxima yacas

insmath_rawmath=yes

wims_backslash_insmath=yes

parmcnt=0

!reset uvname, uvval, uvcnt

!readdef $userfile

!readdef $votedir/$vote.votes

!default vcnt=0

!if $wims_user=supervisor or $vote_show>0

 !if $wims_user=supervisor

  showres=2

 !else

  showres=1

 !endif

 whovote_login=!sh cd $wims_home/log/classes/$wims_superclass/.users;\

grep -r "!set user_vote_$Vote=yes" * | cut -d":" -f1;

 whovote_login=!lines2items $whovote_login

 whovote=$empty

 !for k in $whovote_login

  tmp=!defof user_firstname user_lastname in wimshome/log/classes/$wims_superclass/.users/$k

  whovote=!append item $tmp to $whovote

 !next k

!else

 showres=0

!endif